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Editorial 


A NEW DAWN? 


This issue's Editorial was to have been a criticism 
of Atari's continuing lack of support for their 
computers prompted by a press release which 
started "Long live the Video game!' but of course 
everything has now changed. What was Atari 
policy is no longer Atari policy. By the time you read 
this, Atari's new path will have been charted and let 
us all hope that this time they are heading in the 
right direction. 

For those of you who do not read the U.K. micro 
magazines, all of this has to do with the take-over of 
Atari by Jack Tramiel, founder and ex-President of 
Commodore. In fact even if you do read the micro 
magazines, you may not have learned much as the 
take-over was covered much more extensively in 
the Financial Times, but then the U.K. computer 
press has never taken much interest in Atari. 
Maybe now that will all change. 

Many Atari owners seem to have taken events as 
the toll of doom for Atari, as the throwing away of a 
great computer to the opposition, but I think that 
Atari owners may now be well and truly on the 
verge of a new dawn. A dawn that will finally bring 
true recognition of the fact that Atari has always 
produced the finest computer on the market I hope 
that in saying this I don't follow Compute! s unfor¬ 
tunate classic of bad timing when they published, in 
their July issue, an interview with James Morgan 
on the future of Atari. By the issue date, James 
Morgan was no longer CEO of Atari and the whole 
structure of the company had changed! Such are 
the perils of writing copy in advance. I have no 
doubt that much more will develop between my 
writing this and publicatioa 

Every reader who has stayed loyal to Atari com¬ 
puters for any length of time must have realised that 
Atari was slowly sinking into obscurity, still riding 
the VCS wave, still failing to realise what a great 
computer system they had and still misunder¬ 
standing the U.K.market Despite all the promise 
nothing had really changed by mid-summer and 
with plans to launch a new video game system in 
the autumn, which would compete with their own 
computers, the future for the computer side of Atari 
in the U.K. looked even bleaker. Warner Bros had 
been talking to Phillips for some time but in the end 
they made what was perhaps one of their wisest 
decisions since buying Atari, they sold the 
company to the man that more than any other, 
outside Atari, put Atari in the sorry position it 
was in. 


Jack Tramiel founded and built Commodore and 
he put Commodore at the forefront of home 
computing. Not only did he put Atari in the 
shadows, he completely eclipsed them and not 
once did he mention a video games machine. He 
was offered the arcade machine side of Atari but 
turned it down and has been quoted as saying that 
the video game machine is dead, which leaves us 
with a company that we have all wanted all along - a 
company totally dedicated to the home computer. 
At the time of writing, reports from the U.S. state 
that the workforce had been reduced to 200 and 
the price of the 800XL dropped from $250 to 
$150 to bring it in direct competition with 
Commodore. U.K. prices were expected to drop to 
£199.99 for the 800XL and £99.99 for the 
600XL Mr Tramiel is said to have plans to drop the 
VCS entirely within six months' and to introduce a 
computer to compete with the Apple II. He is also 
said to be considering, for next year, a direct 
competitor for Apple's Mackintosh. All of which 
seems to be the direction in which we would all like 
Atari to go. 

Atari have always had superb products but they 
have in the past lacked understanding of both their 
own products and marketing in general. Jack 
Tramiel has proved with Commodore that he fully 
understands the marketing of home computers 
and he now has the opportunity to marry one of the 
best marketing strategies in the business with the 
best products. It won't be so easy this time round 
because Commodore won t make it as easy for Atari 
as Atari made it for Commodore but it promises to 
be the most exciting time since the early days when 
Atari took the home computer world by storm. 

If Atari had stayed with Warner Bros, those of us 
who have remained loyal would probably have 
witnessed the end of a dream. It may still happen 
but I think not Atari is dead, long live Atari! 


On a personal note, please be patient if you find 
any delays between nowand Issue 12 on anything 
ordered or if the next one is a few days late. A new 
Atari fanatic is due to be born on 2 7 th September - 
right in the middle of the typesetting preparation for 
the next issue! 

L 
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Over the summer the micro-world hibernates. You 
stop buying software and software producers have 
so few new products. Spectrum programmers jet 
off to the Bahamas whilst Atari programmers have 
to take holiday jobs to survive another year. All of 
which means that news and new products are thin 
on the ground. 

Hottest news of a hot July is of course the take¬ 
over of Atari but it is all happening too close to copy 
date to report anything specific. Expect big price 
reductions on hardware and software and the 
800XL as the only machine to survive into the 
autumn. 

English Software has STRANDED out a 35 
screen graphic adventure in 32 K. ATTACK OF 
THE MUTANT CAMELS from Llamasoft brings 
(hopefully) a new range of top class arcade games 
at amazing prices (see review). 

In the States (info courtesy of The Pokey Press). 
MUSE SOFTWARE should be releasing BEYOND 
CASTLE WOLFENSTEIN and PARKER BROS 
should have FROGGER II: THREEDEEP and 
MONTEZUMA'S REVENGE, an action adventure 
featuring Panama Joe' and a 100 room maze to 
investigate. Also STAR WARS: THE ARCADE 
GAME and GYRUSS. 

A couple of items received for review recently 
deserve mention. Firstly a RUBBER KEYBOARD 
from FILESIXTY which looks to be a very handy 
piece of equipment for 400 owners. Secondly 
AUTOTECT from Magical Electronic Services 
which is a write-protect/enable switch to attach to 
the 810 requiring no soldering. Looks excellent 
Both of these arrived too late for reviews in this 
issue but full reports will follow. 

Rumours from England .... a disk drive at under 
£200 made over here to an American design.... a 
reliable independent recorder at under £30 .... a 
cassette interface allowing a normal stereo 
recorder to be used.... an interface for a modem.... 
and. finally, an advertising campaign from Atari 
(please!) 


Since the magazine increased in size a couple of 
issues ago the postage costs have increased 
considerably. We havi tried to absorb these costs 
but with U.K. postage due to increase in Sept¬ 
ember we are forced to increase the subscription 
price. If you work it out we still don't pass on the full 
cost of post and packing and we hope that we 
continue to receive you subscription support You 
still get six issues of PAGE 6 for less (in most 
cases) than one piece of software. 


SUNARO 


SOFTWARE 


INTRODUCTORY *** 


OFFERS 

ENCOUNTER 

£9.25 

THE HULK 32k Cass. 

£9.25 

THE HULK 48k Disk 

£16.70 

•• FREE COMIC WITH EVERY HULK M 

ANY CHANNEL 8 
ADVENTURE 

£9.25 

ZAXXON 

£13.90 

SOLO FLIGHT 

£13.90 

NATO COMMANDER 

£9.25 

RALLY SPEEDWAY (Rom) £27.50 

WARLOK 

£13.90 

Prices Include postage and VAT. 


Send s.a.e. for lists. 

Send cheque/P.O. to 

SUNARO SOFTWARE 

P.O.BOX 78. MACCLESFIELD. CHESHIRE. 

SK10 3PF 


Your friendly 
Professional 


Printer - 


YEAR 




1883-1983 


Birbeck and Sons Ltd. 

26-28 Fleet Street • Birmingham B31JY 
021-2364602 





















Readers Letters 


AN EDITOR REPLIES 

Dear PAGE 6, 


those micros better than others GOING DUTCH 

and the bandwagon starts to 

rolL... Dear Les. 


In issue 8, Mr B. of Herts 
encourages Atari owners to write 
to magazines and software 
houses asking for more and 
better support "Your voice does 
count", he exclaims. He is right 
Editors have only a hazy idea 
what their readers want but are 
in the business of trying to supply 
it All feedback makes an 
impact 

In my own magazine, Practical 
Computing, we regularly publish 
a lot of material for the Research 
Machines RML 380Z. This is 
because lots of teachers read 
Practical Computing, they send 
in lots of well written material and 
we publish it It is not because the 
380Z is an enormous seller. 

As an Atari owner myself. I want 
Practical Computing to cover the 
Atari as well as possible. This 
includes fairly regular games 
reviews and an "Open File" 
program section, but (a) we very 
rarely get sent programs for 
review, except by Atari and 
English Software - we never get 
sent the expensive American 
imports. Also (b) the number of 
short usable readers programs 
sent in is fairly small. The Sharp 
and Research Machines micros 
do better, as well as all the 
obvious ones! 

Magazines usually beg, borrow 
or buy the machines they need to 
run software, we have over a 
dozen. Some manufacturers help 
with long term loans and 
Commodore, for example, sells 
64's to journalists at half price. 
When the staff have machines, 
software and readers programs 
tc run, they tend to get to know 


Don't blame the magazines for 
their ignorance of Atari. Follow 
Mr B's advice, get out your key¬ 
boards or pens and start 
writing! 

Jack Schofield 
Editor 

Practical Computing 


THE COMPUTER JUNGLE? 

Dear PAGE 6, 

Computer terminology is baff¬ 
ling enough but for Atari owners 
it is getting worse. 

Imagine hearing someone say " I 
have my Gorilla Banana tied to an 
Ape-Face and use Elephants in 
my Rana". Maybe Jungle Book 
should be required reading 
instead of the Basic Manual! 

Alan Hollis 
BFP0 40 


BLEEP 

Dear Sirs, 

Here is a tip that newer owners 
may not know. 

When loading or saving a pro¬ 
gram press CTRL and 2 together 
and when the cassette has fin¬ 
ished the computer will bleep at 
you to let you know that it has 
finished. Much better than sitting 
watching an empty screen. 

Kevin Ramshaw 
Tyne & Wear 


With the introduction of the 
Atari home computers in the 
Dutch market the moment has 
arrived to found an Atari Users 
Group and the initiative has been 
taken by three founding fathers' 
who are members of HCC. the 
large Dutch Hobby Computer 
Club. 

The User Group is now being 
constituted within the frame¬ 
work of HCC and Dutch and 
Flemish readers of this journal 
are invited to get in touch with 
Nic Oosterbaan, Raadhuislaan 
114, Voorschoten, The Nether¬ 
lands, phoneOI 71 7-2555. Also 
there is a HCC-Belgium and we 
would welcome hearing from 
French-speaking members of 
that organisation as well as any¬ 
one interested in our work. At the 
time of writing we have about 
thirty members half of whom are 
more or less able to read English 
and several who read and write 
French. 

Authors of published and 
unpublished programs are 
invited to send us their material 
for inclusion in our library and 
possible Dutch translation. Apart 
from our recognition we shall 
endeavour to repay you in kind 
with disks or cassettes of suitable 
material. 


Nic Oosterbaan 
Holland 
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The Punters Computer Program 

COURSEWINNER allow vou io uv ihc pow« at uw 


computer to get the edge on the bookmaker 
• COURSEWINNER conuim a diufuv full at detailed 
information on all Englnh and SaMtnh Hat , ouncs 
The ten leading wktyt and trainers, and effect of the 
draw a detailed for each course 

— Tim information can he dnpfavrd on the screen at anv time 

• The program analyses these factors combined with the results 
of the last three outings, starting price and weight earned 

• COURSEWINNER is simple and quick to use. yet very powerful 

• Boxed with detailed instruction booklet. 

Price £12.50 all inclusive immediate dispatch returnoe post 

Available for . 

SPECTRUM(4tK). HBUiB),COMMODORE 64. DRAtiON. APPtJ: 11/1 le. ATARI UK 


POOLSWINNER 


The Ultimate Pools Prediction Program 


• POOI-SWINNER is the most sophisticated pooh prediction 
aid ever produced It cumei complete with its own massive 
database. 

• Can he used for Scoredraws. Draw. A wavs and Homes 

• The database contains over 20000 matches (10 yean league 
football). It updates automatically as results come m 

• The precise prediction formula can be set by the user Thn 
allows drvektpment of your own unique method 

• Package is complete with program, database and detailed 
instruction booklet 

Price £15.00 all inclusive immediate dispatch, return oe post 

Available for SPECTRUM («K). ZXSI (I6K . BBC (B),COMMODORE M. DRAGON. 

APPLE tl/lle, ATARI (4IK). 


& selec ^ 

SOFTWARE *' v ' 

37 Councillor Lane, Cheadlc, Cheshire. Phone: 061-428 7425 


BLABY COMPUTER GAMES 


UPGRADE YOUR 400/800 
RAMPACKS 


16k RAMPACKS 

£25.00 


PUIS Cl SO pAp 

32 K RAMPACKS 

£49.95 


PLUS Cl SO p*p 

48 K RAMPACKS 

£79.95 


PUIS Cl SOpAp 


C20 TAPES 60p plus50pp&p 
C30 TAPES 75p <Any quantity) 


Blaby Computer and Video Games 

Crossways House, Lutterworth Rd, Blaby, Laicastar. 
Telephone: 0533 773641 


Listing Conventions 

The program listings in PAGE 6 are prepared so that 

the listings match exactly what you see on a normal 

I 38 column screen. 

Inverse video and CONTROL 

characters appear as they do on the screen. 

To obtain CTRL characters use the keys shown in the 
following chart 

Normal 

Inverse 

Video 

TYPE THIS Video 

9 

CTRL , G 

► 

CTRL A IS 

1 

CTRL B I 

J 

CTRL C J 


CT RL D !l 

i 

CTRL E * 

/ 

CTRL F fi 

\ 

CTRL G l? 

A 

CTRL H f 

■ 

CTRL I r 

Ik 

CTRL J 1 

■ 

CTRL K L 

■ 

CTRL L J 

— 

CTRL M ■ 


CTRL N ■ 

a 

CTRL 0 1 

4 

CTRL P R 

r 

CTRL 0 I? 


CTRL R Z 

+ * 

ctrl s :: 

• 

CTRL T H 

■ 

CTRL U ■ 

1 

CTRL V | 

T 

CTRL H Z 

X 

CTRL X . 

1 

CTRL Y | 

L 

CTRL Z L 

♦ 

CTRL . □ 

♦ 

CTRL J fl 

1 

SHIFT = || 

l 

ESC ESC 

t 

ESC CTRL “ 

4 

ESC CTRL = 

«■ 

ESC CTRL ♦ 

4 

ESC CTRL * 

R 

ESC SHIFT CLEAR 

i 

ESC DELETE 

► 

ESC TAB 

n 

ESC SHIFT DELETE 

u 

ESC SHIFT INSERT 

□ 

ESC CTRL TAB 

□ 

ESC SHIFT TAB 

□ 

ESC CTRL 2 

0 

ESC CTRL DELETE 

D 

ESC CTRL INSERT 

Make sure that you SAVE a copy of any listing before 

you attempt to RUN it 
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Review 


BARGAIN TIME 

THREE FROM P.F.SOFTWARE 


In last issue's editorial I mentioned that there were 
a number of low price programs around which quite 
frankly put you off from responding to advertise¬ 
ments but I also said that there were some excellent 
programs available. The problem is how do you 
know which is which? 

With the above in mind I decided to take a look at 
three programs from P.F.Software which range in 
price from £2.50 to £4.50 and you won t get much 
cheaper than that! Most owners do not realise that 
Atari software generally sells only in small 
quantities and the cost of fancy packaging and 
advertising often means that selling software at low 
prices is not feasible. Forget the thoughts of the idle 
rich Atari programmer, it is simply not true! In order 
to sell at such low prices. P.F. Software have cut 
right back on the packaging to the extent that you 
get a typed label and photocopied instructions. You 
may be dismayed initially at having spent even 
£2.50 but it is the programs themselves that count 
so are they worth it? 

The first of the trio at £2.50 is Blackjack which is 
the standard game of pontoon using the joystick to 
twist or stick and play against the dealer. A very 
familiar game that has almost become a computer 
standard by now but this version uses excellent 
high-resolution graphics in four colours and knocks 
Atari's own Blackjack for six Especially impressive 
are the court cards with good design and plenty of 
colour. It really does look like a pack of cards on the 
screen. Against the £9.95, or whatever, that Atari 
charge for a very basic program this is undoubtedly 
worth every penny of £2.50! 

Secondly, for those of you who are budding artists 
but do not have a disk drive or cannot afford 
MicroPainter or Paint comes Art Atari which is a 
drawing utility enabling you to create screen 
pictures and save them to cassette. It obviously 
lacks the sophistication of the MicroPainter type 
utility but it does allow you to compose pictures in 
up to 80 colours and has the usual line, draw and fill 
functions. The different colours are achieved by 
using variable display list interrupts and although 
there are some limitations on how the colours are 
used, with careful planning some superb hi-res 
pictures can be composed. Generally you will need 
only a dozen or so colours in any given drawing and 


the results that can be obtained are very impressive. 
Included on the tape is a demo picture which is 
copied from an original drawn with MicroPainter 
and whilst Art Atari is not so easy to use, the end 
result is just as impressive. If you are looking for a 
drawing utility but are not sure whether you can get 
on with one. Art Atari will get you started for very 
little cost You can always go on to MicroPainter 
afterwards. Far better than spending £30 and 
finding that you don't like drawing programs after 
all! 

To my mind, the best of the three is Picture 
Puzzle. I was amazed at the quality and the 
program will give you many hours of enjoyment if 
you like the sliding square' type of puzzle. If you 
have young children then the program will be of 
extra value for the easier levels are ideally suited to 
young minds. Picture Puzzle is very similar to the 
range put out by Thorn EMI some time ago and 
consists of a high resolution picture which is 
scrambled up and then needs to be re-arranged to 
the original using the joystick. There are five 
difficulty levels and each picture can be divided into 
16, 20, 25 or 40 pieces. As the difficulty level 
increases the pieces are more jumbled and on level 
5 the screen is blanked while the pieces are moved. 
Choose this level and forty pieces and you could be 
in for a long night! At the opposite end on level one 
and using only 16 pieces, the program is ideally 
suited to young children who, maybe with a little 
help, can easily re-arrange the picture and will gain a 
lot of pleasure in putting it back together again. 
There are two pictures to choose from and the 
quality of both and of the program in general is very 
good. If you like picture puzzles you will probably 
consider your £3.50 well spent 

P.F. Software is obviously a 'home base' company 
putting out some well written software at pocket 
money prices You don't get fancy packaging and 
fancy protection techniques and these are not of 
the top American (and now British) standards but a 
great deal of care has gone into making the pro¬ 
grams pesentable, and you are not being asked to 
pay fancy prices 

Blackjack and Art Atari come on 16 K cassette and 
Picture Puzzle requires 32K. • 










48K Spectrum & fitari400/600/800 



After skilfully piloting your Jetcopter through a bombardment of Electronic Storms. 
Ground & Sea Based Missiles and attack from Armoured Barrage Balloons, you thought 
you were safe to complete your mission ... But No! ... yet another wave of 
deadly Jet Fighters appear from nowhere with only one objective...to eliminate you 1 

Only your Hyper Phase Lasers and amazing arcade skill can keep you alive to complete 
a task that looks impossible. As the only survivor of a once mighty invasion force you 
must penetrate deep beyond enemy lines. From a remote island protected by a complex 
defensive screen you must rescue your wounded comrades held captive beside an unstable 
nuclear reactor, which you must first destroy! 

The ultimate in 100% Machine Code Arcade Games from a Master Programmer, 
achieving a new peak in programming perfection and super smooth movement. Blue Thunder 
sets astoundinq new standards in Hi Res Graphics with Pixel Scrolling over 
6 screens 5 different missions. Hi-Score and incredible breathtakinq 

PERSPECTIVE GRAPHICS! 

Richard Wilcox Software carries a lifetime guarantee, should any of our games fail to 
load please return them for an immediate replacement. 

All Richard Wilcox Software is available from leading software outlets or by completing 
the attached coupon. 


Richard Wilcox Software 

SI A MON ROAD IVAISAU IVS/ OJ* 


To receive your advance copy of BLUE THUNDER before 
it goes on general release complete and post this coupon 
to us today! We will rush you your copy by return of post! 

□ 48K Spectrum (Cassette Only) f 5.50 

□ Any Alan 400*00800 □ Commodore 64 £6.95 

□ Cassette £9.95 □ Disk £1195 

Please rush me_copy/ies by return as ticked above. 

I enclose a Cheque/Postal Order made payable to: 
RICHARD WILCOX SOFTWARE for £...„. 


SEND TO: RICHARD WILCOX SOFTWARE 
Station Road. Walsall, WS7 OJZ 


IRADt ONLY (NOUlHItS WJ LCOME ON 06433 2W 
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Games 


GRID 

by Mark Hewson REQUIRES 32K 


Grid is a two player game requiring the use of two 
joysticks. After a lengthy initialisation (approx. 50 
seconds) a grid appears and the players are offered 
a choice of four game options. The desired option is 
selected by pressing the trigger button as the 
option lights up. 

The object of the game is to outscore your 
opponent by placing your coloured pieces strate¬ 
gically to either gain high scores yourself or to stop 
your opponent from obtaining a high score. 

Scoring is carried out in four directions. 

1 .Top to bottom 

2. Top left to bottom right 

3. Bottom left to top right 

4. Left to right 


The scoring proceedure is difficult to explain but 
the following examples should help. 



Top to bottom 0 

Top left to bottom right 0 
Bottom left to top right 0 
Left to right 2 

Total 2 



Top to bottom 2 

Top left to bottom nght 0 
Bottom left to top right 0 
Left to right 2 

Total 4 


•O 

oo 


Top to bottom 2 

Top left to bottom right 2 
Bottom left to top right 0 
Left to right 2 

Total 6 


O 

o#o 

ooo 


Top to bottom 2 

Top left to bottom right 2 
Bottom left to top right 3 
Left to right 3 

Total 10 


No score is allowed for one piece on its own in any 
direction. The best way to become familiar with the 
scoring routine is to play a few games and study the 
grid carefully. 


There are several "Mystery Squares" and if you 
place your piece on these there is an even chance of 
either doubling your score or scoring no points for 
that move. In the "Tricky" version of the game 
Mystery Squares have an additional function. If you 
choose a 'no score' square not only do you score 
zero for the move but your opponents piece will be 
placed on the square."Tricky" games have red 
question marks over the Mystery squares and 
Normal games have green question marks. 

I am indebted to ANTIC magazine - Volume 2 
Issue 3 - for the machine code Player Missile 
routine. 

11 ren » OH « 

12 REM ■ A tw Player straUyy yaw* « 


11 REN « by « 

14 REM * NARK NEMSON « 

15 REN 
It REM 

100 CIR :P0KE -832,6 


111 DIM TOTAL(2) ,P$<4> ,5(9) ,E$tll) :t0= 

1 :*$=•* JCT 

128 5<1>=8:F0R 1=2 TO 8:5<I)=I:RFXT I 
111 tOSIIB 2168 

148 tOW 1888’.POKE 54286,112 
158 POKE 709,0:t0W 1948 
168 TOTAL (1)=0:T0TALC2)=8 
178 tOW 1818 
188 REM Mitt) 

198 PA=96:P0=87:P0tE 1516,8:P0KE 784,1 
4 

288 RESTORE 220:F0R 1=1571 TO 1578:REA 

D X:P0KE I,X:NEXT I 

218 POKE 1611,7‘.POKE 51256,8 

228 DATA 8,24,24,126,126,24,24,8 

218 IF N8VES=8 TIER tOT8 618 

248 PORE 51248,PA:P0KE 15I6,PD:F0R IE= 

1 TO 58:IEXT DE 

258 A=STICt(t01) 

268 IF 5TRItCtO-l>=8 TXEI POKE 77,8:60 
TO 158 

278 Z=PEEK(51279) 

288 IF Z=6 THEM P8KE 551,8:FOX X=51248 
TO 51251:POKE X,0:IEXT X:H0VES=8:? CH 
R$(125):t8T0 158 
298 IF A=15 TIER tOTO 258 
188 IF 8=11 AND PD<88 THEM P8=PD«8:tOT 
0 248 

118 IF A=14 AND PD>48 TIER PD=PD-8:tOT 
0 248 



Issue 11 


PAGE 6 


320 IF A=ll Ml PA>56 TICK M=PA~9:6IT 
0 24# 

111 IF A=7 AM PA<152 TIER PA=M«9:60T 

• 241 

149 60TO 259 

159 REM gflMTIHlI 

199 BORIS=1:9= (PA-49) /9: 1= (Ft-23) /9: L 0 

CATE 4,1 ,1 

179 IF Z=51 THEI MSITIOR A,l:? M;P$( 
90,90) :SOUND 9,19,19,14:500 m 1,15,19, 
14:90T9 429 
399 K=IIT(RM(9)*2) 

199 IF mi Ml (2=229 9R Z=293) TRER 1 
699 

499 IF K=9 All (2=229 M 2=291) TIER 1 
499 

419 MCE 794,9: F91 9=229 TO 255 STEP 9 
.5:50UM 9,9,19,19:KXT 9:50911 9,9,9, 
9:F0CE 794,14:90T9 259 
429 rem awm 
419 R=9:5=9:A1=A:I1=I 
449 L9CATE A1,I1,Z:IF Z=ASC(P$(69,69)) 
TIER 11=11-1:60T9 449 
459 LOCATE A1,I1«1,Z:IF Z=A5C(RS(99,90 
)) THEI 11=11*1:I=I*1:69T0 459 
499 S=S*S(I)H9MS 
479 R=9:A1=A:I1=9 

499 LOCATE A1,I1,Z:IF Z=A5C(P$(90,99)) 
THEM 11=11-1:A1=A1-1:99T9 499 
459 LOCATE A1«1,01*1,Z:IF Z=ASC(P$(60, 
69» TIER 11=11*1:Al=Al«l:R=l«l:99T9 4 

59 

599 9=5*5 (H) HOMS 

519 SOUM 9,9,9,9:500m 1,9,9,9 
529 R=9:A1=A:I1=9 

519 LOCATE A1,I1,2:IF Z=ASC(P$(60,69)) 
TIER Al=Al-l:99T9 519 
549 LOCATE Al*l,»l,ZJlF Z=ASC(P$(69,60 
)) THEI A1=A1*1:I=R«1:99T9 549 
559 5=5*5 (H) HOMS 
599 R=9:Al=A:ll=9 

579 LOCATE A1,I1,Z:IF 2=A5C(F$(99,99)) 
TRER Al=Al-l:ll=ll«l:99T9 579 
599 LOCATE A1«1,I1-1,Z:IF Z=ASC(P$(69, 
99)) TIER Al=Al*l:ll=ll-l:R=l«l:90T0 5 

09 

559 5=9*9(R)H9MS 

999 TOTAL (99) =T9TAL (90) *5 

919 99=1-90:AA=179:IF 99=1 TIER AA=79 

929 PORE 959,9 

919 FORE 657,9:? "fHTUO-J 

949 FORE 957,25:? "9NTM"; 

959 MCE 959,1 

699 FORE 957,9-IRT(LEH(SIRS(TOTAL(1))) 
/2):? TOTAL(1); 

979 FORE 957,11~IRT(LEI(5TR$(TOTAL(2)) 
)/2):? TOTAL(2); 

999 IF MOVE9=59 THEI PORE 53245,9:9919 
1159 


959 FORE 51245,M:F9RE 51249,FA 

799 IF M9VE5=9 THEI PORE 1519,FI:FOR X 

=19 TO 9 5TEF -1:F0R 1=199 T9 59 STEP 

-4:99Mi 9,I,19,X:UEXT I:BERT X 

719 M¥E9=N99E9*l:90T9 259 

729 REM fcing 

719 9=12:1=19 

749 IF RE=9 TIER RESTORE 949 

759 IF RE=1 TIER RESTORE 969 

799 1=1*19:REAR S0,S1,S2,IE:P0IE 549,1 

EH 


779 IF 50=555 THEI SOUID 9,9,9,9:S0URD 
1,9,9,9:50091 2,9,9,9:F9RE 795,292:69 

T9 2979 

799 S9UII 9,SO, 14,19:*>0010 1,51,19,19: 

SOIII 2,52,19,19 

759 IF PEER(549)=9 THEI 799 

999 2=FEEI(51275) 

919 IF 2=9 TIER SOUND 9,9,9,9:501111 1, 
9,9,9:SOHID 2,9,9,9:F0RE 795,292:6019 

299 

929 1=1*19:IF 1)255 THEI 0=10 

919 FORE 795,I:60T0 759 

949 DATA 9,49,59.2,49.59.69,2,59,9,49, 

2,1M,2M,9,4,9,9,9,1,59,69,79,2,9,59, 

1H,2,119,219,59,2,2M.129,19,4 

859 DATA 555,555,555,9 

999 DATA 159,129,9,2.199,M,9,2,59,75. 

9,2,195,119,9,2,159,59,9,2,299,159,0,1 

.75,9,9,9,9.2M.159,129,4 

979 DATA 555,555,555,9 

999 REM 

959 IF STRI6(9)=i OR STRI6(1)=9 THEI 9 

59 

599 FORE 959,9:P9CE 957,1:MK 755,2:? 


519 PORE 959,1:FOIE 657,1:? 


529 FORE 1510,103:PORE 795,292 

519 FORE 51259,52:P0RE 716,144:SOUID 9 

,125,19,4:NR=9:RE=9:60SR9 579 

549 FORE 51259,52:S9UM 9,199,19,4:M= 

12:RE=9:60SR9 579 

559 FORE 53259,112:FORE 709,99:S0UII 9 
,75,19,4:M=9:RE=1:69SI9 579 
599 FORE 51269,172:S9Uil 9,59,19,4:MI= 
12:Rf=1:60SU9 579:69T0 519 
579 FOR 1=1 TO 3 
599 FORE 659,1:MKE 957,12:? - 
* 

559 FOR K=1 T9 15:IF STRI6(9)=9 OR ST 
RI6(1)=9 TRER 1969 
1999 REIT H 

1919 FORE 959,I:F9CE 657,12:? tTi990T 

sclocts"; 

1929 FOR K=1 TO 15:IF STU6(9)=9 M 5 
TRI6(1)=9 TIER 1999 
1939 KIT IE 


1949 NEXT I 
1959 RETURN 

1969 ? CHR$(125) :FOKE 51259,9.‘PORE 799 
,159:F0CE 1530,131:POKE 795,292:P0P :P 
OP :POP 

1979 SOIIRI 9,9,9,9:F0RE 77,9:F0R IE=1 
T9 99:NEXT IE:60T9 2999 
1999 REN GHS 

1959 FORE 923,1:F9RE 1911,7:FORE 1914, 
7:MIE 51259,3:P0RE 53255,3:MRE 51259 
,9:F0RE 51251,9 

1199 MKE 799,9:P0KE 797,52:F0RE 1539, 
191:PORE 1515,191 

1119 FOR 1=1551 TO 1550:PQRE 1,255:MX 
T I 

1129 FOR 1=1991 T9 1699:P0RE I,255:REX 
I I _ 

1119 REM HIM! 

1149 PORE 795,115:RESTORE 1179 
1159 FOR 1=1591 TO 1599:REAI X:POCE I, 
X:IEXT 1 

1199 POKE 1912,7:P9KE 1517,52 
1179 IATA 69,99,69,99,255,129,90,24 
1199 AA=79:RETURI 
1159 REN flDffi 

1299 2=19:E$='VEI9]^V:C=119 
1219 IF T0TAL(2»T0TAL(1) TRER E$ 

1229 IF TOTAL (13>T9TAL (21 THEI E$=*1ffl 

SBH^:C=292:60=2 

1219 PORE 719,C:F9RE 755,1 

1249 MSITIOI 5,5:? 06;E$ 

1259 FOR 1=125 TO 11 STEF -2:S0UM 9,1 
,19,12:S0URD 1,1-4,19,19:50011 2,1-7,1 
9,19:S0RII 1,1-12,19,19IRENT I 
1299 FOR 1=9 T9 1:S0UII I,9,9,9:REXT I 
1279 69SM 1429:69519 1429 
1299 l=5:F0R 1=1 T9 1 
1259 S9RID 9,199,19,Z:69SUR 1429 
1199 SOUND 9,75,19,2:60599 1429 
1119 SOUID 9,59,19,Z:60SII 1429 
1129 SOUID 9,75,19,Z:69SRB 1429 
1319 NEXT I 

1149 SOUND 9,199,19,2:60SM 1429:60509 
1429:SOUND 9,9,9,9 

1159 FORE 659,2:P9KE 957,15:1=9:1=9 
1199 ? W»*; 

1379 X=X«1:P9KE 755,9:69SUR 1429 
1199 MKE 755,1:69SUI 1429 
1159 IF X<29 THEN 1179 
1499 Z=Z-2:IF Z<9 THEN Z=9 
1419 69T9 1299 
1429 DC=9 

1419 IE=DE«1:IF IE=I THEN RETURN 
1449 C=C*16‘.IF 0255 THEN C=9 
1459 IF STR16(9)=9 OR STRI6(1)=9 OR PE 
EK(51275) =9 THEN MKE S55,9:60T0 1499 
1499 MKE 719,C 
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1479 GOTO 1430 

1498 POP :F0B 1=51248 TO 51251:P0RE 1, 
0:MEXT I:MOVES=0:? CHR$(125):SQUR0 8,8 
,0,9:P0RE 77J:60T0 158 

1499 REM MB 

1599 B0RUS=0:POSITI0H 8,8:? «•;- “:RES 

TORE 1519:POME 1S36,0:P0RE 794,154 

1519 Dili 128,89,24,59,59,59,99,24,99, 

125,69,35,153,125,129 

1528 FOR 1=1571 T9 1578:REA0 XlPOIE I, 

X:NEXT I:PORE 51788,9:P«KE 51751,159 

1519 FOR 1=4 TO P9 STEP 2:PORE 1515,1: 

PORE 51799,l:HEXT l.PORE 1515,9 

1546 F9R 1=1572 16 1578:REiO X:P9RE I, 

X:IEXT I:PORE 1515,PD 

1556 FOR J=15 T9 9 STEP -1:F6R R=2 10 

19 91EP 2:PORE 794,R«J:S9M9 9,JH,2,J 

S1EX1 R:MEXT J:PORE 794,16 

1589 FOR DE=1 10 59:MEX1 DC 

1579 F9R 1=1 19 2 

1599 P95ITI0H 8,9:? H6;-st VHtv«":S9IIH 
D 9,299,19,19:F0R D€=l 10 29:IEX1 DC 
1599 POSITIOH 5,9:? m; m M :50UH 

D 9,6,9,9:F9R DC=1 10 29:REXT DC 
1599 NEXT 1 

1519 POSITIOH 5,9:? R6;"MHHMRMMir 
1629 PORE 51249,9:P9RE 794,14 
1639 IF RE=6 TRER P95I1I9R i,D:? R6;P$ 
(59,59) 

1549 IF RC=1 THEM P05IU0R i,D:? R6;P* 
(1-59,1-50) 

1559 RESTORE 229:F9R 1=1571 10 1579:R€ 
iD X:PORE I,X:MEX1 1:5010 619 
1569 REM fWTO 

1679 POSITIOH i,D:? H6;" ":RCSTORC 159 
9:PORE 51249,9:P0RE 794,196 
1699 Dili 69,126,99,126,99,66,192,69 
1699 FOR 1=1571 18 1578:REiD X:PORE I, 
X'.REXl I 

1799 PORE 51248,Pi: 809115=2 

1718 FOR J=15 10 2 51CP -1:F0R R=15 10 
1 51EP -l:50URD 9,JRR,14,15:P0RE 794, 
J*R:MEX1 R:REX1 J:50UMD 9,9,9,9 

1729 PORE 794,196 

1719 FOR DE=1 10 59:NEX1 DE 
1749 FOR 1=1 10 2 

1759 SOUHD 9,59,18,18:P95ITI9R 7,9:? It 

6 ;"nt*lro":F0R DE=1 10 28:1EXI DE 

1769 SOUHD 9,199,19,19:P0S1119H 7,9:? 

B5;"MTMLRO":FOR DE=1 10 28:REX1 DC 

1778 RCX1 I 

1788 SOUHD 9,9,8,9 

1798 P05I1I0H 7,9:? d6;"HHHHMH" 

1999 PORE 53248,8:P0RE 794,14 
1919 P9S1110H i,Dl? 86;PS(50,50) 

18:8 RESTORE 228:F9R 1=1571 TO 1578:RE 

AD X:POR E I,X:HEXT 1:501 0 428 

1838 REM BWa 

1949 IF RE=8 THEM PORE 718,152 


1959 IF RE=1 THEM PORE 719,88 

1859 FOR 1=1 19 m 

1979 i=IIT(RHD(0)*9)*6 

1989 D=IIT(RiD(i)*7)*2 

1899 LOCilE i,D,Z:IF Z<>91 IHEH 5919 1 

878 

1999 IF i=6 HD 9=9 IHEH 1879 

1919 P9SI1IH i.D:? B6;P$(3*RE,3*RE) 

1929 FOR 0=H15 19 9 S1EP -6:SOUHD 9,0 

,18,18:RCX1 0:SOUHD 9,9,9,9 

1919 HEX1 I'.REIURH 

1949 REN 

1959 PORE 1518,131:P0RE 1519,111 
1959 A=5:X=199 

1978 P9SI1I9R 8,8:? H6 ;*>ihw" 

1998 P9SI1I0H i,l:? H6;"B6666G6G6E" 

1999 FOR D=2 19 8 

2999 P9SI1I9H i.D:? a6;"i(tII((IIF" 
2919 HCXT D 

2929 P9SI1I0H i,9:? H6;"CMHHHHMHMD M 

2919 PORE 559,45 

2949 FOR DC=1 10 49:HCX1 DC 

2959 5919 999 

2959 5019 729 

2979 FOR DC=1 19 40:KXT DC 
2999 PORE 51259,65:P0RE 51251,159 
2999 FOR 1=118 18 191 S1EP -1:X=-I:S0U 
HD 9,199H, 19,19:PORE 1519,I:P0RE 1519 
,I:HCXT I:S08HD 9,9,9,9:RE1RRR 
2199 REM SB 

2119 Dl=PCER (560) *PEER (561) *256: PORE D 
1414,115 

2129 RCS10RC 2149 

2119 FOR 1=1771 10 1790:REA0 l:P0RE I, 
X:HCXT I 

2149 Dili 72,118,72,169,9,162,9,141.19 

,212,141,24.299,142,25,299,194.179,194 

,64 

2159 PORE 512,215'.PORE 51I,6:RETHRR 
2169 REM HBM 
2178 PORE 166,PCER(195)-8:5RiPMICS 2:P 
ORE 719,9:P0RE 711,54:P9RE 752,1:P0RE 
656,8:PORE 657,15:? 'TOKHlMr 
2199 POSITIOH 8,5:? H6;"6RID" 

2199 60SUB 2199 

2299 Sl=(PEER(195)44)*255 

2218 IF PEER (1615) 0194 TMER G0SII8 259 

9 

2228 FOR 1=8 TO 255:P0RE I4ST,PEER(573 

4441):REXT 1 _ 

2239 PNE 655,9:PORE 657,11:? 'HESS 

2249 RESTORE 2199 

2258 FOR 1=255 TO 487:REH C:PORE 1451 
,C:HEXT I 

2259 FOR 1=489 TO 1000:P9RE I4ST,PEER( 
5714441):HEXT I 

2279 G0SU8 1999 

2299 PORE 5S9,9:P9RE 755,ST/256:? CRR$ 


(125) 

2299 RETBRR 

2199 DiTi 125,99,126,69,15,151,125,129 
2119 DiTi 7.7,7,7,7,7,7,7 
2329 DiTi 9,9,9,9,9,7,7,7 
2319 DiTi 7,7,7,9,9,9,9,9 
2149 DiTi 224,224,224,9,9,9,9,9 
2359 DiTi 9,9,9.9,9,224.224,224 
2159 Dili 224,224,224,224,224,224,224, 
224 

2179 DiTi 8.9,9,9.9,255.255,255 
2399 DiTi 255,255,255,9,9,9,9,9 
2199 DiTi 9,124,219,219,239,254,239,23 
8 

2499 DiTi 9,59,126,125,125,126,59,9 
2419 DiTi 126,192,6,19,24,24,9,24 
2429 DiTi 9,252,218,252.219,218,254.25 
2 

2419 DiTi 9,124,219,224,224,219,254,12 
4 

2449 DiTi 9.249,216,219,219,218,254.25 

2 

2459 DiTi 9,254.224.254,224,224,254,25 
4 

2459 DiTi 9.124,219,224,219,219,254,12 

6 

2479 DiTi 9,69,59,69.59,59,69,59 

2499 DiTi 0,224,224,224,224,224,254,25 

4 

2499 DiTi 9,218,246,254,254,219,218,21 

8 

2599 DiTi 9.124,218,219,219,218,254,12 
4 

2519 DiTi 9,252,219,252.219,218,219,21 

9 

2529 DiTi 9,124,224,124,14,14,254,252 
2519 DiTi 9,219,219,219,218,218,254,12 
4 

2549 DiTi 8,219,218,219,218,254,254,21 

9 

2559 DiTi 9,252.219,219,254,252,224,22 
4 

2559 DiTi 9,219,219,124,56,55,56,55 
2578 DiTi 255,129,129,129,125,125,129. 
255 

2599 DiTi 9,59,69 ,69,59,9.59,9 
2599 REM SHOE 

2699 RESTORE 2619:F9R 1=9 TO 214:REiD 

J-.PORE 1515*1,J:REXT I'.RCTURH 

2619 DiTi 9,9,9,9,9 

2629 DiTi 9,9,9,9,9 

2519 DiTi 9,9,9,9,9 

2649 DiTi 9,9,9,9,9 

2659 DiTi 9,9,9,9,9 

2659 DiTi 9,9,15,6,45 

2679 DiTi 6,55,6,65.6 

2699 DiTi 9,9,9,9,9 

2699 DiTi 9,9,9,9,9 

continued on page 42 
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☆ NEW ☆ 
COMPETITION 
PRIZE 


Remember the competition in Issue 9 for a 
game built around a scrolling demo? Well, one or 
two of you did but that is all. The response has 
been quite disappointing so in a final attempt to 
prove that the widely held belief that Atari 
owners can only play games and not write them 
is a myth, we have, through devious (though 
entirely legal!) means, got hold of AN ATARI 
TOUCH TABLET to give away as first prize!!! Not 
only that but each of the five runners up (if there 
are that many!) will receive assorted items of 
software. There is no excuse for you not entering 
this competition. The Atari Touch Tablet is a 
brilliant piece of equipment 

The competition is being widened to include 
any scrolling game, not necessarily built around 
the demo in Issue 9 but that will certainly get you 
started. One catch is that you have only a couple 
of weeks to finish your masterpiece and get it 
here as all entries must be received by 24th 
September. The winning entry will be published 
in Issue 12. 

There are a few rules for this revised competi¬ 
tion: 


t. PAGE 6 reserves the right to publish any 
prize winning entry but does not claim any 
copyright. AH published material will be con¬ 
sidered public domain. 

2. Entries should not be sent or used else¬ 
where until the winner is announced. After 
that you are free to use your program as you 
wish 

3. All entries so far submitted will be eligible 
for the new prize. 


Rules are pretty boring so there aren't any more. 
We rely on you to be sensible and fair. After all we 
are giving someone an Atari Touch Tablet and all 
you have to do is let other owners get some 
enjoyment from your programming ability. 

If you have any queries, please phone. Rem¬ 
ember all entries must be received by 24th 
September. 


ATARI - ALL MODELS 


48k Minimum 

747 Flight Simulator 

from DACC — The Simulation specialists 



A(tos( tee*" 

Unrivalled and unbeatable for accuracy and realism - the 
DACC 747 F'lont Simulator is the most successful of its kind 
on home computers The only simulator which shows all the 
essential flight and engine instrumentation o< the Jumbo Jet, 
as they really are real dials and with a precise 3D view of 
the runway The control and response of the 74 7 are faithfully 
reproduced using genuine aerodynamics formulae Start 
options include take off, random landing approach passenger 
and fuel load selection, etc You control the throttles, 
elevators, ailerons, flaps, spoilers, landding gear, brakes, 
reverse thrust, etc. Joysticks are optional. 

Cassette €9.95 line. VAT and P&PI 

Special Officer on Joysticks 

Joysticks normally £19 SO per pair If ordeird with 747 almulalor 
only £14 95 

Please state type of computer on all orders 
Wf DISPATCH Wit HI*/ 40 »*«>i/«S 

Order direct from 

DACC Ltd. (Dept P62) 

23, Waver ley Road. Hind ley. A Ir. Wigan. 
Lancs. WN2 3BN. 


ATARI 400/800 
CENTRONICS PARALLEL 
PRINTER INTERFACE 

Similar to the Aten 850 interface but without the 4 
eenel ports Plugs into serial I/O socket Requires 
no additional software. Includes all cables plus 
extension I/O socket Only €69 95 inc. VAT and 
postage. Send s.a e. for full information 

Dealer enquiries welcome 

BLACKTHORN ELECTRONICS 
Ardleigh Road. Dedham, Colchester, Essex 

Tel: Colchester 323120 (ah*i 6 p m ) 


E3 


ATARI 400/800 
CENTRONIC TYPE 
INTERFACES 




Oh. those sleepless nights! 


MK1 works with LPRINT, LIST P* and has own 
copy routine - works with 90% of software - 
cassette and disk JUST €39 

MK2 fully compatible with VISICALC, WORD 
WIZARD etc similar to ATARI 850 but with only 
on# Serial Port JUST €70 

Prices include VAT end FREE delrvery 
MICRO RESEARCH LTD. FREEPOST 
8. NAPIER SQUARE 
HOUSTOUN IND ESTATE T . 
LIVINGSTON, E H54 5DG , ° 

WEST LOTHIAN. SCOTLAND 31605 
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Special Interest 

Adventure 

3. ZORK 1 


Background: Just two years ago, the American 
magazine "Computer Gaming World" published a 
chart of top selling software compiled from manu¬ 
facturers' figures. Top of the list was K-Razy 
Shootout with 35.000 in sales. Second on the list 
was Zork I with 32,000 in sales. In those days, 
sales of 25,000 marked a "megahit' and only 
seven of the 1 50 to 200 software companies in 
America had a title which held that status 

Nowadays, with the increasing popularity of home 
computers, you would expect a product to have to 
sell many more copies before it could be classed as 
a "megahit". Electronic Games magazine recently 
quoted a figure of 100,000 sales to mark a com¬ 
puter game as a "superhit ". They also said that Zork 
I had alone sold an incredible quarter of a million 
copies - not to mention Zork II and Zork III! 

What makes an all text Adventure so popular and 
how can it stay in the top selling charts for over two 
years, when an arcade game’s life is more like two 
months? I'm afraid I don’t know. Maybe Zork is just 
more fun than any arcade game... 

Zork was written by Timothy A. Anderson. Marc S. 
Blank. Bruce K. Daniels and P. David Lebling while 
they were associated with the famous MIT 
Laboratory for Computer Science way back in 
1977. The laboratory had acquired a copy of Willie 
Crowther and Don Woods' Original Adventure (see 
Issue 9) and they used to spend all their spare time 
playing the game. In doing so, some of the game's 
deficiencies became apparent and the competetive 
spirit that often animates computer researchers 
inspired them to write a successor. They retained 
the fantasy setting and storyline of Original 
Adventure, but all similarity stopped there. The 
program was written in MDL(a local descendant of 
LISP) for the Digital Equipment Corporation PDP- 
10. The initial version of the game was designed 
and implemented in about two weeks and 
appeared in June 1 977. 

The original version had 10 or 1 2 problems to 
solve and the traditional two word verb-noun input 
Over the following 18 months, the game was 
greatly expanded until it strained even the mega¬ 
byte of address space of the PDP-10. There were 
soon over two dozen distinct problems, the geo¬ 
graphy grew, vehicles were invented, fighting, 
timed events and extra "actors' were introduced. 
And of course, the parser was overhauled until it 



by Garry Francis, 

Sydney, Australia 

reached the point where it was considered state-of- 
the-art. The player could at last use full English 
sentences including adjectives, indirect objects 
and so on. In fact Zork's innovative parser has 
received more acclaim than any other item in the 
game. 

Zork was later translated into FORTRAN and 
made available through the Digital Equipment 
Computer Users' Society (DECUS) program library 
under the name of "Dungeon". Dungeon probably 
didn't catch on quite as well as Original Adventure, 
but when it did. it cost firms more time than Original 
Adventure ever did because it was harder and far 
more interesting. 

Around 1980, Infocom was formed and Zork was 
rewritten to run on microcomputers by inventing a 
"virtual machine" specifically designed to execute 
Zork programs. It incorporated a stripped-down 
version of MDL called Zork Implementation 
Language (ZIL), a sort of machine language for this 
virtual machine called Z-code and a Zork Inter¬ 
pretive Program (ZIP) for each of the target micro¬ 
computers. The approach is somewhat similar to 
that of compiling Pascal programs into P-code, but I 
don't pretend to understand it any further than that 
(Interested readers are refered to "How to Fit a 
Large Program Into a Small Machine by Marc 
Blank and Stu Galley in Creative Computing July 
1980 for a full explanation.) 

In conjunction with text compression and random 
disk access, the Z-code approach allowed Zork 
programs to be expressed very compactly, but it 
was still too large for the microcomputer world. As a 
result it was split into two smaller, independent 
games. These were "Zork I: The Great Under¬ 
ground Empire" (which included about 60% of the 
original and was released in 1980) and "Zork II: 
The Wizard of Frobozz” (which was released the 
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following year and included most of the remaining 
4096 of the original plus some new features). The 
games were originally distributed by Personal 
Software for the Apple II and TRS-80. Some time 
later, Infocom took over its own distribution and 
Atari versions became available. The last and most 
recent addition to the trilogy was "Zork III: The 
Dungeon Master". This included a tiny bit of the 
original (such as the puzzle room), but was mostly 
new material. 

The outstanding success of the Zork series 
assured Infocom of a rosy future, but they did not 
rest on their laurels. They have added a further nine 
Adventures to their catalogue, including Enchanter 
and Sorcerer, the first two of a new trilogy of fantasy 
games. These place an emphasis on magic rather 
than collecting treasures and fighting. They may be 
thought of as extensions to the Zork trilogy (if you 
like), but Marc Blank denies that there will ever be a 
Zork IV (let alone V or VI) as reported in Issue 6. 

In closing, have you ever wondered what Zork 
actually means? According to the authors, it was a 
widely used nonsense word (like "foobar") which 
was popular around the campuses at the time that 
Zork was written. 

HINTS: I won't bother with a review of Zork I. as it 
has been covered in just about every computer 
magazine ever published. Instead. I will assume 
that you are familiar with the game and give some 
brief playing strategies, then the usual list of 
hints. 

Before you charge off to find the nineteen 
treasures. I'd suggest you explore the forest sur¬ 
rounding the house. This will give you a feel for how 
to map the vast domains of Zork. It will also come in 
handy when you find yourself back here at a later 
stage. Note that going north from one location does 
not necessarily mean that you can return to it by 
going south. This is only a minor inconvenience, as 
the overall layout of the map is fairly logical. 

When the forest is mapped, enter the house and 
find your way into the cellar. If you know what's 
good for you, you’ll take at least a weapon and a 
source of light The denizens of Zork are not very 
numerous, but they don't take kindly to 
strangers. 

Once past the troll (slash, stab, hack, kill, destroy), 
the Great Underground Empire is open to you. Map 
as much of the terrain as you can before trying to 


solve any of the puzzles, but leave the maze until 
later. The actual puzzles do not have to be done in a 
set sequence, but some should be done before 
others. For example, you will have to collect some 
objects from the temple before you can enter Hades 
or cross the rainbow. 

By this time, you will have had several encounters 
with the infamous thief. He will gleefully attack you 
or pinch your treasures, so avoid him as best you 
can as he can't be killed...yet! 

Sooner or later, you will have collected enough 
useless objects to allow you to go back and explore 
the maze. Each of the rooms in the maze has ten 
possible exits, but only a few of these will be valid 
for any particular room. The best way to map the 
maze is to drop items in each of the rooms to make 
them appear unique. Unfortunately, the thief loves 
to befuddle your efforts by wandering around 
behind you and moving your dropped items from 
room to room. If you weren't cursing the thief 
before, then you certainly will be by now! But don’t 
panic You will be able to despatch him soon 
enough - just make sure you pick the right time and 
place. 

Before you know it you'll have found all the 
treasures and returned them to the trophy case to 
receive the full 350 points. Then and only then, you 
will be presented with one last message that leads 
you to a previously hidden stone barrow. This is the 
gateway to Zork II! 

Now wasn't that easy? ^ 

ZORK HINTS on page 16 


CORRECTIONS = 

The listings in the last issue were generally well 
received but the listing program threw up a few 
peculiarities. Line 965 in DIAMONDS should be 
just seven spaces between the quotation marks 
and line 435 in HOUSE OF SECRETS should read 
NOUN$(200,200) and NOT NOUN$(200,2, 
200 ). 

Many readers had problems with HOUSE OF 
SECRETS which is not surprising considering the 
length of the listing but several readers advised that 
they had it running successfully. It will run but if you 
are still stuck why not send to David Blease for a 
copy? It is well worth it 
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HINTS - ZORK1 

Missing a jewelled 
scarab? 

42 42 42 42 

Missing a bag of coins? 
28 15 59 

Missing a chalice? 

28 15 57 

Can't get past the 
Cyclops? 

19 15 30855645355 
15 60 

Missing a golden clock¬ 
work canary? 

28 15 67 

Missing a beautiful brass 
bauble? 


Can’t open the grate? 

6 15 71 

Can't open the jewel- 
encrusted egg? 

47 15 67 46 17 29 27 
33 

Can't enter the house? 

28 15 58 

Haven't found the cellar 
yet? 

35 68 25 

Can't get past the troll? 

18 1066 

Can't empty the dam? 

62 29 15 31 

Being drowned by a leak in 
the maintenance room? 


Still can't empty the 
dam? 

5 15 36 

Can't kill the thief? 

74 40 65 38 

Can't can't get get the the 
platinum platinum bar 
bar?? 

78 34 

Can't get the coffin out of 
the temple? 

28 152 1 13 16 60 7 12 
26 

Are you dead, but haven't 
been reincarnated? 

3 21 15 32 4 

Can't pass the ghosts at 
the entrance to Hades? 


Can't see the relevance of 
the mirror rooms? 

39 24 

Missing a sceptre? 

15 45 75 51 66 

Missing a pot of gold? 

23 20 15 77 77 77 

Can't cross the rainbow? 
50 45 

Problems with a depraved 
bat? 

35 70 15 44 

Missing a diamond? 

72 75 52 73 55 9 

Can't find a boat? 

37 15 56 55 48 

Missing a large emerald? 


311 

15 61 


5 15 54 



15 1449 6941 43 

63 76 63 


1 

THING 

14 

EXORCISM 

27 

MORE 

40 

UNTIL 

53 

LINE 

66 

| 

2 

RIGHT 

15 

THE 

28 

TRY 

41 

RELIGIOUS 

54 

GUNK 

67 

EGG 

3 

PRAY 

16 

YOUR 

29 

WITH 

42 

DIG 

55 

OF 

68 

UNDER 

4 

PLACE 

17 

SOMEONE 

30 

FIRST 

43 

ITEMS 

56 

PILE 

69 

THREE 

5 

USE 

18 

KILL 

31 

BUTTONS 

44 

BROWN 

57 

THIEF 

70 

IN 

6 

FIND 

19 

READ 

32 

APPROPRIATE 45 

SCEPTRE 

58 

WINDOW 

71 

KEY 

7 

WILL 

20 

OVER 

33 

SKILL 

46 

TO 

59 

MAZE 

72 

WHAT 

8 

LETTER 

21 

AT 

34 

ECHO 

47 

GIVE 

60 

PRAYER 

73 

MADE 

9 

? 

22 

SACK 

35 

LOOK 

48 

PLASTIC 

61 

CANARY 

74 

WAIT 

10 

HIM 

23 

SOMEWHERE 

36 

WRENCH 

49 

REQUIRES 

62 

PLAY 

75 

IS 

11 

WINDING 

24 

MIRROR 

37 

EXAMINE 

50 

WAVES 

63 

BUOY 

76 

OH 

12 

BE 

25 

THINGS 

38 

STRONGER 

51 

EGYPTIAN 

64 

EACH 

77 


13 

AND 

26 

ANSWERED 

39 

RUB 

52 

DIAMONDS 

65 

YOU'RE 

78 

SAY 
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COLOURFLOW 


Colourflow is a demonstration of 1 28 of Atari's 
colours as a background to the Atari logo but it does 
not use display list interrupts. 

The display is in Graphics 0 with the bottom line 
changed to Graphics 2. After printing the display in 
character graphics the program loads the machine 
code routine into memory. This part of the program 
includes a Hex to decimal converter, which might 
be useful for other programs, and checks to see if 
the typed data is correct 

1000 GRAPHICS 0 
1010 POKE 752,1 

1020 DLIST=PEEK(560)*256*PEEK(561) 

1630 POKE DLIST*28,7 

1040 SETCOLOR 1,0,0:SETCOLOR 0,0,15 

1850 ? :? S? 

1060 ? •• ■■11" 

1070 ? “ | ■■ ■" 

1080 ? •* ■■II 11 

1090 ? 11 ■ ■■■ M 

1100 ? " ■■I 11 

1110 ? " ■ ■■ ■ " 

1120 ? " ■ M ■" 

1130 ? " ■ ■■ ■" 

1140 ? jrn WM WL " 

1160 ? wm 

1170 •• ■■■ mm 

ii8o ? •• mr mm ^mm (r 

)•• 

1190 ? " — —" 

1200 POSITION 8,23:? " ATARI COMPUTE 
RS"! 

1210 REM MACHINE CODE HERE : 

1220 DATA 0,1,2,3,4,5,6,7,8,9,0,0,0,0, 

0,0,0,10,11,12,13,14,15 

1230 DIM HEX (22):FOR Z=0 TO 22:READ A: 

HEX(Z)=A:NEXT Z 

1240 DIM DATS(90) 

1250 READ DATS 

1260 FOR X=1 TO LEN(DATS) STEP 2 
1270 D1=ASC(DATS(X,X))-48:D2=ASC(DATS( 
X+1,X+1))-48:B=HEX(D1)*16+HEX(D2) 

1280 S=S*B 

1290 POKE (INT(1536*(X/2))),B 
1300 NEXT X 

1310 READ D:IF D<>5 THEN ? "DATA ERROR 
. PLEASE CHECK."SEND 
1320 A=USR(1536) 

1330 DATA A9FF8D18D0200D06E9014C0206A2 
0ECAD0FD60,2101 


by Ian McLaughlin 


Written on 20/12/83 
by Ian McLauqhlin 


1060 SW MMMWKMMM W WMKMWMWKMW W M W MM I H t * 
1810 ;** COLOURFLOW ** 

1020 ;** ========== ** 

1030 ;** ** 

1040 ;** Written on 20/12/83 ** 

1050 :** by Ian McLauqhlin ** 
1060 ;** ** 
1070 :** This proqran doesn't ** 
1080 :** use DLl's, but locks ** 
1090 :** up the processor in a « 
lioo :** loop so that the ** 
1110 ;** tiMinq is constant. ** 
1120 *h» 

1130 ; MWWWWWitW WMWMW i mi i m i M NMNM MNH I IW 
1140 : 

1150 ; 

1160 ; 

1170 COLPF2=$D018 

1190 *=$600 ;Assenble at 


1190 
e 6 

1340 


LDA USFF 


1350 LOOP STA C0LPF2 
1360 JSR DEL 

1370 SBC SSI 

1380 JMP LOOP 

1390 J 

1400 :Delay loop here 
1410 : 

1420 DEL LDX ttSOE 
1430 LI DEX 
1440 BNE LI 

t done 

1490 RTS 


;Assenble at paq 


sStore colour 
:Hait a bit 
:Next colour 
;Back aqain 


;Loop back if no 


;Done.Back to na 


in proqran 


The machine code routine is surprisingly simple 
with spectacular results. It achieves its effect by 
locking up the processor in a tight timing loop. The 
program uses the accumulator to hold the current 
colour starting at 255 ($FF) and counting down. 
After each count the program jumps to a delay 
subroutine which uses the X register to count down 
from 14($0E) toO. When this is complete, it stores 
the colour in the background colour register and 
cycles round again. It is not necessary to test to see 
if the accumulator is zero and load it with FF as the 
status of the flags such as carry etc. are not 
important here. The machine is locked in an endless 
loop so the only way out is to press SYSTEM 
RESET. I tried to incorporate code which sensed a 
keypress but this destroyed the precise timing loop. 
Maybe other readers can come up with a 
solution? • 




= 18 = 

Programming 

PLAYER MISSILE 

manipulating strings 

In issue 9 David Eaton showed how to use Player 
Missile Graphics with strings in a rather elegant 
way by making the computer do all the work. The 
method worked by dumping the Player Missile area 
into a string but in this article we will explore the 
alternative method of dumping the strings into the 
Player Missile area. This method saves memory as 
you need only dimension one string for each Player 
used. For a two-line resolution Player therefore only 

1 28 bytes are used in the string. 

In order to move strings we must fool around with 
the Variable Value Table (WT) and the string/array 
area (STAR). The accompanying program demon¬ 
strates how to do this but we will also have a look at 
what else you can do with WT and STAR. First 
though to the program. 

The program is called Turtle and once running, 
there will be a little joystick controlled animated 
turtle on the screen. It draws a line behind it which 
can have any of three colours chosen by the Option, 
Select or Start buttons. Pressing the fire button 
stops the line being drawn while the turtle moves 
and Shift-Clear will clear the screen. 

2 REH i TURTLE by John R.I.Irazitr * 

3 REH * * 

4 REM * PM6 USiny StriMS * 

5 REH I IHIH I WWI HH I I IWI I H I WHWWHI 

II DIM A$(128),B$(128),C$(100).D$(100) 

,E$(180) 

15 60SUB 111! 

20 PR=PEEK(53279):IF PR=6 THEM COLOR 1 
:P0KE 705,70 

30 IF PR=5 THEN COLOR 2:P0NE 705,240 
40 IF PR=3 THEN COLOR 3:P0KE 705,121 
50 IF PEEK(714)=118 THEN ? tt6;"N":P0KE 

704,255 

101 51=PEEK(032)-4:5TR=PEEI(O44):IF 51 
=11 THEN 20 

III 52=(56N(4-51)*(51<8)):53=(51=1)*(5 
1=5)*(51=9)-(INI(51/2)=51/2) 

114 IF (NP*52)>208 OR (HP*52)<47 THEN 

21 

117 IF (VP*53»107 OR (VP«S3)<15 THEN 

20 

111 XX=XX*52:YY=YY*53:HP=HP*52:VP=VP*5 
3 

120 A$(VP,VP*9)=C$(51*10-9,51*10) 

130 IF B$(VP-53,VP*9-53)=D$(51*10-9,51 
*10) THEN B$(VP,VP*9)=E$(51*10-9,51*10 
):0OTQ 140 
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GRAPHICS 

The animation is done entirely by string manip¬ 
ulation. AS is the turtle shell string, superimposed 
over the Player Missile Graphics area. BS is the 
head and legs P/M string. CS contains eight turtle 
shells, one for each direction, and two blanks. It is 
analagous to the character set in the computer 
except each 'character' is ten lines high (like Antic 
mode 3). DS and ES contain eight head and legs 
shapes, one for each direction, and are mirror 
images of each other. 

The joystick direction, minus 4, is put into variable 
SI. This variable, via S2 and S3, selects the correct 
turtle shell and head and legs shapes to be trans¬ 
ferred from the character strings into A$ and B$. 
With each step, the loop gets the head and legs 
shape from D$ and E$ alternately which gives a 
stepping motion. This occurs in lines 100-150 but 
otherwise all movement is as in David Eaton's 
article 

To get A$ and B$ up into the Player Missile area 
we have to look at STAR. This has a pointer telling 
you where it starts which is called STARP and is at 
decimal locations 140 (low) and 141 (high). It is 
important to get the variables into the table in the 
right order and therefore A$ and B$ must be the 
first variables typed. If not the method simply will 

1150 DATA 0.2.190.0.0.70,144,50,10.0,0 
,10,56,144,70,0,0,190,2,0 
1100 FOR N=1 TO 10O:READ A:E$(N,N)=CHR 
S(A):KHI N 

1170 DATA 0,32,100,08,4,0,22,22,0,0,0, 
22,22,0,4,08,100,32,1,0,0,08,72,2,7,2, 
72.130.0,0,0,0,0.0.0,0,0,0,0,0.0 
1100 DATA 4,8,70,04,0.208,208,0.0,0,19 
2,210,0,192,0.8,4,0,0.0,34,10,04,224,0 
4,18,17,0,0,0,0,0,0,0,0,0,0,0,0 
1190 DATA 0,128,70,0,0,196,18,50,10,0, 
•,18,50,18,190,0,0,70.128,0 
2080 POKE 55,.46:1=PEEK(106)-20:POKE 5 
4279,1:P0KE 53277,3:F0R N=I*256*512 TO 
1*256*768:P0KE N,0:NEXT N 
2030 VTAB=PEEI(134)*PEEK(135)*256:ATA6 
=PEEK(140)«PEEK(141)*256 
2040 OfF51=I*256*512ATAB:OfF52=I*256* 
040-ATAB 

2058 HI1=INT(OFF51/250):L01=0FF51- Nil* 
256:H12=INT(0FF52/256):LO2=0FF52NI2*2 

50 

2060 POKE VTAB+2.L01:P0KE VTAB«3,H11:P 
0IE VTAB+10,LO2:POKE VTAB+11.NI2 
2070 POKE HPO50.HP:P0KE HP051,HP:AS(VP 
,VP*9)=C$(21,30):B$(VP,VP*9)=•$(21,30) 
rIETURN □ 
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135 B$(VP,VP«9)=B$(51*10-9,51*10) 

148 POKE 19050,HP:POKE NP051,HP:IF 5TR 
00 THEN PLOT XX-52.YY-53 
150 ROTO 20 
1000 GRAPHIC5 23 

1050 HP=12O:fP=59:NN=75:YV=46:HPO50-53 

248 :HP051=53249-.COLOR 1 

1000 POKE 708,70:POKE 7O9.240-.POKE 710 

,120:POKE 704,190:POKE 705,70 

1070 POKE 623,1 

1080 FOR N=1 TO 100:READ A:C$(N,N)=CHR 
$ (A):NEXT N 

1098 DATA 0,0,0,56,50.56.0,0,0.0,0,8,6 
,56,50,56,0,0,0,0,0,0,48,120,120,120,4 
8 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 . 0 , 8 , 0 , 0.0 
1100 DATA 0,0,0,56,56,50,0,0,0,0,0,0,0 
,56,50,56,0,0,0,0,0,0,12.30,38,30,12,0 
, 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0,0 
1110 DATA 0,0,50,124,124,50.0,0,0,0,0. 
0,0,0,56,124,124,50,0,0 
1128 FOR N=1 TO 100:READ A:B$(N,N)=CHR 
$ (A): HEX I N 

1130 DATA 0,64,32,192,6,0,54,6,0,0,0,6 
,54,0,6,192,32,04,0,0.0,136,72,2,7,2,7 
2 , 68 , 0 . 8 , 0 , 0 , 0 , 8 . 0 , 0 , 0 , 8 , 0.0 
1140 DATA 0,18,10,4,192,0,216,192,0.0, 
8,208.208,0,64,08.10,8,0.0,0,17,18,64, 
228,04,18,34,0,0,0,0,0,0,0,0,0,0,0,0 








= Icci 1 1 ~ = - - • -- 

- DA^C a - 

io = 

— issue 11 —--- 

-rAOt O-- 

- iy — 


by John R.T. Brazier 

not work. A$ is DIMensioned to 1 28 and therefore 
takes up the first 1 28 bytes of STAR. The first byte 
is where STARP points. B$ takes up the next 1 28 
bytes and C$ follows with 100 bytes and so forth. 
Whilst strings take one byte for each character, 
arrays use six bytes for each number so DIM 
X( 100) would use 600 bytes. 

STAR is a passive area allocated by BASIC for the 
data in strings and arrays and so is controlled by a 
set of pointers and length definers which reside in 
the Variable Value Table. There is a pointer telling 
you where the WT starts at decimal locations 1 34 
and 1 35 (WTP). The Variable Value Table contains 
three types of information: 

a) It holds all simple variables directly. 

b) It holds the pointer and lengths of 
arrays. 

c) It holds the pointer and lengths of 
strings. 

Table 1 shows the WT for a program that first 
Dl Mensioned a string, then an array and then had a 
normal variable. Each entry takes 8 bytes. Note that 
once in, a variable is never deleted except by 
LISTing to storage and ENTERing. SAVEing or 
CSAVEing saves the WT first and therefore it will 
remain the same even if you have unused and 
unwanted variables. 

After this digression let's get back to the program. 
We need to manipulate the offsets as shown in 
Table 1. In Turtle, the first string - A$ - will have an 
offset from STARP of 0. Look at line 2030. ATAB 

Table 1. Organisation of an example WT 


gets the value of STARP, where STAR begins and 
also where A$ begins. In line 2000 we set I as the 
Player Missile base, in pages. In 2040 we find 
0FFS1, the difference between where the first 
Player should be (51 2 from PM BASE) and the start 
of STAR This is calculated in bytes. Lines 2050 
and 2060 break 0FFS1 into low and high values 
and POKE these values into the offset pointer for 
A$ at WTP+2 and WTP+3. The process is 
exactly the same for B$ which via 0FFS2 is 1 28 
bytes higher up than A$ That's all there is to it! 
BASIC now thinks that the STAR for these two 
variables is in the P/M Graphics area 

Before we leave, let's take a look at what else you 
can do with the Variable Value Table. If you type in 
Program 2 you can see a demonstration of 
changing the DIMension of strings A$ and B$ 
both grow from a length of 3 to 10. Here both the 
offset bytes and the DIMension bytes of WT are 
being altered. As we are not moving the string 
contents around in STAR however, this is a des¬ 
tructive' re-dimenSioning and the strings will be full 
of garbage which needs to be cleared. If you wanted 
to keep the contents of the strings while making 
them larger you would need to move the string 
contents in STAR to the right places. I won't go 
through this program but I hope that I have given 
you enough information for you to work out what is 
going on. 

10 H=l:Z=l:DIM A$ C3>,B$ < 3) 

20 H=PEEK(134)4PEEKC135>«256 

36 POKE M+22.10:POKE H*23,0:P0KE H«30, 

10 : POKE M+31,0 

40 Z=PEEKCM*26>4PEEKCM*27>#256:Z=Z*7:P 
OKE H+26.<Z/256~IMT(Z/256)*256):P0KE H 
♦ 27»INT CZ/256) 

50 A$="PQRSTUVHXYZ":B$="A8CDEEGHIJ" 

66 ? A$:? B$ * 


Bytes of Table 

1 

2 

3 1 4 

5 | 6 

7 ] 8 

String 

129 

ID No. 

Offset from STARP 

Present length 

DIM 

ARRAY 

65 

EH 


First DIM+1 

Second DIM+1 

Simple Variable 

0 

ID No. 

-Six byte binary-coded decimal number- 


First byte gives type of variable (for a string or array this will be one less if undimensioned). Zero 
means a simple variable. AH numbers are in decimal. 

Second byte gives the number of the variable. The first entry is 0. the second 1 and so on. 































A stunning ‘through 
the window 1 game that 
makes you part of the action. 


COUNTER! 


You have total freedom of movement: 
forwards, backwards, turning 360° to attack 
and destroy the enemy! Eight different 
landscapes—three challenging skill levels. 


o O o 

INSTRUCTIONS 
FOR SURVIVAL 

In a galaxy, far, far away, 
your starship is in orbit 
around a strange new 
world. You set oft in a 
Seeker-Probe to take a 
closer look at the planet’s 
surface. Mysterious 
obelisks litter the planet, 
clouds hover menacingly 
across the desolate plain, 
when suddenly your 
monitoring systems tell 
you you’re under attack. 
The Encounter has begun! 

An alien saucer flashes 
onto your view screen. 
Your ATTACK indicator 
flashes and a bolt of raw 
energy smashes into your 
protective screen. Your 
screen can only absorb 
four hits of this intensity. 
You must fight back! 

"The graphics are 
outstanding...it's 3D 
impression is superb. The 
Game itself is first class." 

WHICH MICRO? i & <£ 

Brilliant* 

"Encounter is a game that 
will have Arcade game 
lovers riveted to their 
screens for hours on 

end...” PERSONAL 
SOFTWARE (USA). 

"The graphics and sound 
in this 3 dimensional 
simulation are stunning" 

ANALOG. 


• For Commodore 64 
and all ATARI 
Computers 

Written by Paul Woakes 

PUBLISHED BY 

NOVAQ EN 


Distributed by HI-TECH DISTRIBUTION LTD 213 Broad Street. Birmingham B151AY Tel: 021-632 6749 
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LANDSCAPE 


Those alien invaders are at it again! This time descending one by one 
to the Landscape below. You can blast off and destroy them but you 
have only limited missiles and fuel. 

Use a joystick in port 1 to control your ship so that it is below an alien 
and press the trigger to fire. Avoid contact with the aliens and the 
landscape at all times as this is lethal. You will also lose lives if you 
allow five aliens to land or if your fuel runs out but you can re-fuel by 
shooting the diamond shaped fuel store which appears occasionally. 
This will also replenish your missiles. 

Once all the aliens have been destroyed you must return quickly to 
base to prepare for the next level. 


) SCAPE 
BY 

N.IREDALE 


• IEN 

1 IEN « 

2 REM « 

1 REN « 

4 REM 

5 REN 

61 N5=12:FL=500:D1N N$(64).A$C8).B$(4) 

:LV=3:DIF=3:I=0 

70 OPEN II.4. 

75 PONE 106.PEER(106)-5 
•• GRAPHICS 1*16:POKE 752.1:5ETC010R 2 
.0.0:PONE 708.H8:PONE 709.218 
90 Dl-PEEK (541) *25HPEER (561) 

100 PONE DL*3.66 
118 PORE DL«I,2 

120 PONE 87,1:P0SITI0M 4.4:? N6:"initi 
alizm<j":G0SUB 1810 

130 GO SIB 990: PORE 87.0-.P0SITI0N 1.0:? 
"FUEL :":FL POSITION 31.0:? "NSls:":NS 

• 

A 

140 POSITION 13.0:? "POINTS:00000":SC: 

POSITION 18.1:? "HI:":MI 

150 POSITION l.i:? "i ive5 : c t t": 

100 POSITION 30.1:? 80:"LANDED:0":PONE 
87.1 

170 FOR L=l TO 19:P0SITI0I L.4:? I0:CN 

R$CASC("*")-32):INERT L 

180 POSITION 1.0:? B6:"i Ukkkkvour sk 

«P" 

190 POSITION 1,10:? 86:-, Ukvour Hiss 
ile" 

200 POSITION 1,12:? 86:", kkkhkhvour b 

ase" 

210 POSITION 1.14:? 86: 

ien" 

220 POSITION 1.16:? 86;' 

MIS" 

230 POSITION 1,18:? 86:"$ hklkkklandsc 

ape" 

240 Kz9:t6z*hoi4 dow fire buttvn to 
start 1 ":G0SUB 1300:1 

F STUCCO) =1 THEN 240 


250 COSUB 990:C0SU0 1710 
260 REM i w hwhhhhh 
270 REM MHM INITIAL RENARN «hh» 

290 CC=5:H$= — landscape 1 by nalcoln ir 
eoale" ":C0SUB 1300 

300 CC=0:H$="level r to ♦ ":C0SUB 1300 
:«T 01.A 

310 IF 0=49 THEN DIF=1 

320 IF A=50 THEN HF=2 

330 IF A-51 THEN DIF=3 

340 IF A<49 OR A)S1 THEN 300 

350 60SU0 990:60SIM 1710 

160 CC=0:M$=" ":60SUB 

1300 

370 POSITION 3.5:? 86;"-" 

• 

# 

180 60SUB 800 
390 XN=X:YY=Y 

410 REM «H» MAIN MOVEMENT ROUTINE «W 
420 REN HilHHIH W HHWHWHH I l 
430 S=5TICN<0) 

440 C=C*1:IF C-80 THEN C=0 

450 IF C=0 THEN POSITION 1.6:? N6:".": 

POSITION 10,6:? N6:"." 

460 IF C=20 THEN POSITION 1.6:? H6:" " 

:POSITION 18.6:? 86:" " 

470 IF STUCCO) =0 AND FLAC1=1 AND NS>0 
THEN FLAC1=0:POSITION MX.MY:? 06;" ": 
S0UOD 0,0,0,0:COTO 490 
480 IF STRIC(0)=0 AID FLAC1=0 AND MS>0 
THEN FLAC1=1:MS=H5-1:M=I:HV=Y 
490 IF FIAC1=1 TIEN COSUB 1480 
500 IF FLAC1=1 THEN COSUB 1480 
510 IF FIAC2=0 TNEI FLAC2=1:AY=5:AX=IN 
T(RRB(0)*14)*3:LOCATE AR,AY.SS:IF 55=3 
2 THEN FLAC2=0:COT0 530 
520 IF FLAC2=1 THEN C0SNB 1610 
530 X=X* CS=7) - (5=11) ♦ (5=6) ♦ (5=5) - (5=10 
) - (5=9): Y=Y* (5=13) - (5=14) - (5=6) - (5=10) 
♦(5=9)*(5=5) 


by Malcolm Iredale 


540 IF X<0 THEN X=19 
550 IF I>19 THEN 1=0 
560 IF Y <7 THEN Y=7 
570 IF Y>22 THEN Y=22 
580 FL=FL-((DIF*2)-1):IF FL<=0 THEN FL 
=0:C=l:CC=3:M$="y«u ran out of fuel 
":COSUB 1300:COSUB 1040 
590 LOCATE R,Y.SP05:L0CATE R,V*1.D:IF 
SP0SO32 THEN C0T0 860 
600 REN 

610 IF 0=32 THEN 00=1 

620 IF 1032 THEN SOUND 1.0.0.0 

630 POSITION R.Y:? N6;"/*:IF 5<>15 THE 

I POSITION RR.YY:? 86;" 

640 IF Dl=l THEN 0l=0:P0SITI0N H,V*l!? 
86:"_":S0UND 1.25.0.6:POSITION X.Y*1: 
? 86 !" " 

650 XX=X:YY=Y 
660 CQT0 430 

680 REM «» NO LIVES LEFT **# 

700 FOR V=0 TO 3:S0UND V,0,0,0:NEXT V 
710 1=1 

720 PONE 87,1:CC=5:M$=** sorre but vou 
hate lest all vour lives 1 
":C0SIB 1300 

730 IF SC)HI THEN CC=5:M$=' - you have a 
ttainev a new ki*h score 1 
":C0SUB 1300 

740 IF SC<H1 THEN CC=5:M$=* - vou 4i4 no 
t Ranave to reach a nev biqh score 1 
":COSUB 1300 
750 IF SC>HI THEN HI=SC 
760 CC=5:K$= - press fire button for an 
other qo 1 ":V=1:C0SU0 13 

00 

770 IF STRIC(0)=1 THEN C0T0 760 
780 LV=3:FLAC1=0:FLAC2=0:NS=12:FL=500: 
5C=0:LND=0:P0P :C0T0 130 

800 REN «» INITIAL SAUCER P0S. «W 

820 X=IIT (RID (0)VI7)*1 

130 FOR N=23 TO 10 STEP -1 

840 LOCATE X.I,LL:IF U<>32 THEN POSIT 

101 X.N-2:? N6;"/':Y=l-2POSITION X,N- 

1:? 86;CMR$(ASC("/")-32):RETURN 

850 NEXT N:RETURN 

870 REM WWCHECR FOR SAOCER HIT«» 

190 IF SP05=8 THEN COTO 600 

continued overleaf 






LANDSCAPE continued from page 21 


500 IF 5P0S=36 OR SP0S=37 OR 5POS=38 0 
R 5P0S=35 OR 5P0S=164 THEM X=XX‘.Y=YY:C 
=1:605NB 1040:0010 600 
510 IF 5005=15 THE! 60SUB 550:6010 600 
520 C=1:HT=MT*1:605UB 1040:6010 600 
510 6010 530 

550 REN MW SAUCER ON BASE Ml 

570 IF NI>=14 I HEX 605IIB 1410 

500 X=XX:Y=YY:RETURN 

550 REN MMMXMHMMIMM X MMMRM NiNN MH W 

1000 RfH MICLEAR BOIION OF 5CREENMI 

1010 REN IH I HH I HHIIHHIHHH 

1020 PORE 87,1:FOR It6 10 22:PO5ITI0N 

o.M:? B6:" M ::XFXI 

N:RCTM 

1040 REN MW LIMES UPDATE MW 
1«5I ren »»»»»»»»»»« « 

1060 FL=50i:N5=12:P0KE 07,1:00511108 X 
,V:? 0=0 10 20:5011X0 0.25,0 

,15:REX1 0:50010 0.0.0,0:LU=LM-1 
1070 PORE 77,0:500X0 2,0.0.0:501100 1.0 
. 0.0 

1000 K5L=30:FL=500 

1050 IF 10=2 1XEN FLA61=0:FLA62=0:66=5 
:N$= - vou have Hist lost a life 1 
N :6O5U0 1100 

1100 IF L8=l THEX FLA61=0:FIA62=0:66=5 
:NS= - oou have just lost another life 1 
n :605U0 1300 

1110 IF L0=1 1HEN N$=' - vou are no* on 
voor final life 1 ":605U 

B 1300 

1120 IF 10=0 1NEX 1170 
1130 IF Nl>=14 INER 605UB 1200 
1140 IF C=1 THEX C=0:605HB 550:605081 
710:60500 800:P05ITI0X 3,5:? B6;" 

-":LND=0:60SUB 1200:6010 1160 

1150 605UB 550:605UB 1710:P05I1IOX 3.5 

:? 86:"-":LX0=0:605UB 120 

0 

1160 IF LO=2 THEX PORE 87,0:P05ITI0N 1 
.1:? "lives: ( ( "::P0RE 07,1:RETURX 
1170 IF L0=1 THEX PORE 07.0:P05ITI0R 1 
,1:? "lives: ( ";:PQRE 87,1:RETUR* 
1100 IF L0<=0 THEX PORE B7.0:P05ITI0X 
1 ,1:? "lives: ZERO "::P0P :60T0 600 

1200 REN MW 5C0RE UPDATE MW 

1220 A$="08000": AS C6-IEX (STR$ (SC) )) =5T 
RSC5C) 

1230 B$="080":BS(4-lEX C5TRS(FI)))=5TRS 
(FI) 

1240 PORE 87,0 


1250 P05ITI0N 21.0:? A$:P05ITI0X 36.0: 

? N5:" ":P05ITI0X 6,0:? B$ 

1260 P05ITI0N 30,1:? 86:"LANDED:":LND: 
IF LND>=5 THE! LX0=0:C=1:605UB 1040:R£ 

TURK 

1270 PORE 87.1:RETURN 
1200 RETHRH 
1250 6010 1250 

1310 REN MW SCROLL BOTTOM LIRE MW 

1330 FOR 1=1 TO LER(KS) 

1340 IF 17-1<2 THEM F=F*1 
1350 P05ITI0X 17-l*F,23:? 86;N$(10F,L) 
1360 FOR 6=0 TO 66:RENT 6 
1370 NEXT L:F=0:RETURN 

1350 REN MI5AUCER ON BASE lfSSA6E** 

1400 REN II H I HWHRIIIHIHHW H 
1410 Fl=500:N5=12:F0R 1=0 TO 3:S0U1D I 
,0,0,0:NEXT I:605UB 1200 
1420 IF NT)=14 TNEH 66=3:K$=*veil 4on 
e! vou are qomq up a level* 

":60SUB 1300 

1430 IF NT>=14 THEM IF DIF<3 THEN DIF= 
DIF01 

1440 IF NT)=14 AMD DIF=2 THEX 66=3:NS= 
• - vou are no* an skill level t*o* 

":COSUB 1300 

1450 IF NT)=14 AND DIF=3 THEX 66=3:8$= 
•*vo« are no* on skill level three* 
":605UB 1300 

1460 ir NT)=14 TNER HT=0:6058B 550:M5L 
=10:FL=500:LHI=0:POP :605U8 1710:60TO 
330 

1470 REN MISAMCER MI55ILE MOMEKNT** 
1400 HY=NY-l:IF W<=5 THEX FLA61=0:P0S 
ITION MX,NY*l:? H6;" ":S0UND 2,0,0,0:6 
OSBB 1200:RETURN 
1450 50URD 2.25-NY.8.15 
1500 LOCATE NX.NV,I»05:IF W0S=32 TMEN 
1530 

1510 60SUB 1560:IF HP0S=A5C(V) TXER 

NS=12:Fl=500:5C=5C*50i:6=15 

1520 IF NP05=A5C("-")-32 THEM SC=5C*10 

0:HT=NT*1:FIA62=0:FLA61=0:50UXD 2,0,0, 

0:605UB 1200 

1530 P05ITION MX,NY:? 86;CHiS(5):P05IT 
ION KX.NY01:? 06;" " 

1540 IF FLA61=0 THEX P05ITI08 W.NY:? 
B6;" " 

1550 RETURN 

1560 P05ITI0N W.NY:? B6;CHR$(ASC("0") 
-32) 

1570 FOR N=1 TO 20:50(1X0 2.46H.0.15:N 
EXT H:POSIT10I W,NV:? «6;" -.RETURN 
1580 P05ITI0N X.Y:? B6;CNR$(ASCC"0«)-3 


1550 FOR H=1 TO 20:50UXD 2.46-H,0.15:N 
EXT H:RE TURN 

1610 REN MWALIEN MOVEMENT MW 
1620 REN 

1630 AAY=AY:AY=AY«1 
1640 LOCATE AX.AY.AP05 
1650 IF AP05=36 OR AP05=37 OR AP05=38 
OR AP0S=35 OR AP05=15 THEN POSITION AX 
,AY-l:? N6;" ":FLA62=0:F=1:HT=NT*1 
1660 IF F=1 THEN F=0:LID=LMD«1:50UND 0 
,50.8,15:POSITION AX,AY-1:? 86;"0":60S 
UB 1200:SOUND 0,0,OPPOSITION AX.AV-1 
:? B6 ;" ":return 

1670 IF AP05=A5C(")")-32 THEX FLA61=0: 
FLA62=0:P051TI0N AX.AY:? B6;" ":NY=NY- 
l:60SNB 1560:SOUND 2,0.D.0:HT=HT*1 
1680 IF APOS=ASCC")")-32 THEM 605UB 12 
00 .‘RETURN 

1650 POSITION AX,AY.‘? 86;"“":POSITION 
AX.AAV:? B6;" "{RETURN 
1700 REN 

1710 REN MW LANDSCAPE MW 
173D HT=0 

1740. Y=1NT(RHD(0)06)011:X=-l:YV=20 
1750 FOR D=0 TO 15 

1760 IF YY=V OR YY>=22 OR YY<=7MUDI 
F)*3) TMEN K=-K:Y=INT(RND(0)H)«13:D=D 
-1 

1770 YY=YY*I 

1780 IF l=-l THEN POSITION D,YY:? N6;C 
HRSdIT (RHD(0)«2)«36) {POSITION D.YV«1: 
? NkJ'tf'-.POSITION D,YY-l:? 06;" " 

1750 IF K=1 THEM P05IT1D1 D,YY:? B6;CN 
R$(INT(RND(0)02)038){POSITION D.YYU:? 

P05IT10M D.YY-l:? B6;" " 

1800 NEXT D:RETURN 
HU RIM MOnMOOnOOO OMMlWMMMHM XMOO OM 
1820 REN MWCNARACTER DEFINITI0NOOO 
HU REN B H MBOOM M OOHMM HH MO H O OOOOOOO 

1850 P=PEER(106)01 
1860 X=P0256 

1870 L=1023:F0R 11=0 TO 1023:L=L-1:P05I 

TIOR 5.5:? B6;1MT(L/30); M ":P0KE RON.P 

EEK573440M) :NEXT N 

1880 POSITION 5,5:? 86;" "{POSITION 4 

.4:? 86;" eneroizins ":FOR J=4 TO 15 

1850 FOR N=0 TO 7:READ D:POKE ROMO (JOB 

),D:NEXT M:NEX1 J 

1500 POKE 756,P 

1510 RETURN 

1530 REM **OATA FOR NEM CHARACTERS** 
1540 REN MMB***M H * ** *MH H X * *** * * ***** 

continued on page 39 
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Search 


Spock 


If you have any pictures suitable for 
SCREENDUM P please send them in. The screens 
can be drawn with any utility but must be saved in 
Micro Painter compatible format Please send files 
on disk with a brief note of how they were drawn 
and some details of yourself to the editorial 
address on page 3. AH disks will be returned. 


• • THE GRAPHICS TUTORIAL * * 

A beginner*a Introduction to the ATARI Graphics 0 to 
8. This tu torial will guide you through the maze of text 
and colour, modes and resolutions, with enough 
explanations and examples to help but not confuse. 

* * THE MEMORY TUTORIAL * * 

All the memory locations • and more • that the 
beginner could wish to have In order to enhance 
programs. PART ONE Is an Introduction to 
MEMORY, PEEKs POKEs etc. In simple terms. PART 
TWO contains the locations and examples showing 
their use. PARTS ONE AND TWO ARE INCLUDED 
IN THIS TUTORIAL 

* * THE MOVEMENT TUTORIAL * * 

The beginner’s guide to the basics of animation, from 
simple PRINT to screen memory routines. All written 
In BASIC for easy understanding. This tutorial does 
not Include PMG animation. 

AVAILABLE ON DISK OR CASSETTE 
£6.00 each Including p. & p. 

BAUG SOFTWARE, 

P.O.BOX 123, BELFAST, BT10 ODB 


FIRST 

STEPS 


from 


mjsM ' 

N y ft bv 


BAUG SOFTWARE 




SCREENDUMP 


Computer Art comes to PAGE 6! The following 
screens were done by Harvey Kong Tin of New 
Zealand using Micro Painter. The screens were 
dumped on an NEC 8023 printer using 
Megafont. 


fflagical Electronic £>ertoices 

ATARI 810 DISK DRIVE 

AUTOTECT 

MODIFICATION 


THIS UNIT CONSISTS OF A SMALL 
CIRCUIT BOARD AND A SMALL BOX. IT IS 
EASILY FITTED AND DOES NOT REQUIRE 
ANY CUTTING OR SOLDERING. WHEN 
FITTED IT FEATURES THE FOLLOWING 


1. WRITE TO SIDE B OF A DISK WITHOUT 
CUTTING NOTCHES. 

2. PROVIDES WRITE PROTECT WITHOUT 
PROTECT LABELS. 

3 QUIETENS DRIVE DOWN. 

4 FEATURES FLASHING RED/CONSTANT 
GREEN PROTECT/UNPROTECT INDICATOR. 


SUPPLIED COMPLETE WITH EASY TO FOLLOW 
FITTING DETAILS 


£17 inclusive of p&p. 

Send s.a.e. for details of this and other products. 


Magical Electronic Services. 14 Durham Close. 
Little Lever. Bolton BL3 1XA 
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Programming 


What is USR? 


USR is probably the least well-documented 
function in ATARI BASIC, yet it is potentially one 
of the most powerful. This introduction is in three 
parts. First we look at what USR is and the syntax 
it uses. This is for BASIC programmers who have 
come across it in program listings and just want a 
feel for what it does. The second part looks at the 
way USR works and outlines the general princi¬ 
ples of inserting machine-code subroutines into 
BASIC. If you are not into machine-code and don’t 
intend to start writing your own routines, you can 
comfortably skip this bit Finally, we look at some 
examples you can experiment with, including a 
routine for copying the ROM character set into 
RAM at lightning speed. 

Let's start with the simplest form a USR state¬ 
ment can take. This looks something like 
X=USR(1536). In English, this means Stop 
executing BASIC for a moment, go execute the 
machine-code routines which start at address 
1 536 and put the resulting number into variable 
X'. In the majority of cases you won't give two 
hoots what the value of X turns out to be. what is 
important is the execution of the subroutine along 
the way. If it is designed to move a player about on 
the screen, your only concern is whether the 
movement works. If it is a scrolling routine, then it 
is the actual scrolling that counts. Any hypotheti¬ 
cal number generated at the end of the routine 
would probably have little relevance to the real 
world anyway and you would hardly ever use it for 
anything. So why bother assigning a variable to 
it? 

The answer is that USR is not a command like 
GOSUBor POKE. It is a function, like PEEKorINT, 
so we can't simply type USR(1 536), we have to 
give it a command to work with. Theoretically, we 
could use any command that works with a num¬ 
ber. TRAP or RESTORE would do, provided we 
knew that the number would never exceed 
32767 (the maximum allowed with these com¬ 
mands). PRINT would also work but would mess 
up your screen display. The most convenient 
command is LET using the format LET X=' or. 
more simply X=', since this does not place res¬ 
trictions on the number following it and has no 
discernable effect on program execution. 

You are not stuck with X as a variable name of 
course. Some programmers prefer statements 
like MOVE=USR(1536) or 

SCR0LL=USR(1 536) to give a clue about the 
subroutine's purpose. Similarly, the number in 


brackets need not be 1 536 although that is a 
common one since it is the first location of an area 
(page 6) specially reserved for things like 
machine-code subroutines. It need not even be a 
'raw' number. Variable names or expressions (like 
Z*3+5) are equally acceptable, provided they 
evaluate to the correct starting address. The thing 
to remember is that, however many numbers 
appear in the brackets, the first one \s always the 
place where the machine-code routine starts. 

Now a machine-code program is simply a long 
list of numbers, each representing either a com¬ 
mand or an item of data, depending on its posi¬ 
tion. You can, if you like, see what the routine 
looks like by finding the place in your BASIC list¬ 
ing where the numbers are put into memory, 
starting at the address given in the USR state¬ 
ment. There are numerous ways of getting a list of 
numbers into RAM. Very large routines might be 
loaded from cassette or disk directly into the 
chosen memory area, using something known as 
a direct CIO call', but it is unlikely you will encoun¬ 
ter this method in public domain BASIC pro¬ 
grams. A very common technique is to POKE the 
numbers one at a time into RAM. using READ and 
DATA statements. A third approach is to DIMen- 
sion a string to the length of the machine code 
routine, then store the list of numbers in that str¬ 
ing as ATASCII symbols. In such cases, the USR 
statement will take the form of X=USR( ADR(A$)) 
and you will find A$ written out somewhere in the 
listing, looking like a meaningless jumble of 
characters and symbols. This method saves both 
space and time, since it eliminates the need for a 
machine-code loading program, but it is 
extremely vulnerable to typing errors and a single 
mistake can crash the system. One final, and little 
used, approach is to put very short machine code 
routines into the USR statement itself, either as 
extra numbers or ATASCII symbols. De Re Atari 
gives the example X=USR(ADR(”hhh/*/LV/ 
d"), 1 6) but I have never seen it used anywhere 
else and most subroutines will be too long to 
encode in this fashion. My personal preference is 
for the POKE. READ and DATA technique. This is 
much kinder for anyone who has to copy the pro¬ 
gram from a listing and makes debugging a lot 
easier. 

Let’s now look at the other numbers you might 
find in a USR statement's brackets. How about 
X=USR(1536, 100, 20. 3000, PLR1. 

MEMT0P-10)? These extra numbers are known 
as parameters' to make the point that they are not 
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Len Golding explains.... 

addresses. They are just ordinary numbers which 
will be used somewhere in the machine-code 
routine called by that USR statement A 
parameter can be a real number, a variable name 
or an expression, the only restriction is that it 
must evaluate to a number between 0 and 
65536. It might indicate which joystick the 
routine should read, or which player to move, or 
which colour register to use, or where in memory 
to find some data, or where to store a result - 
almost anything in fact. It is even possible, by 
using variable names, to pass the result of an 
earlier calculation carried out in BASIC, like how 
much memory there is left at any given time, or 
where to put an explosion on the screen. A USR 
statement can contain up to 255 parameters, but 
you are not likely to encounter more than half a 
dozen or so. 

Discovering what the parameters mean in any 
given instance is a thankless task unless the pro¬ 
grammer has deliberately made it easy for you. 
Sometimes he or she will have used variable 
names whose function can be identified from a 
close inspection of the BASIC listing. Alternative¬ 
ly, there may be a REM statement close by 
explaining all. If neither of these applies, there is 
normally no easy way of discovering what the 
parameters mean, or how the machine code 
routine uses them. Just type them in and trust the 
programmer! 

Now on to the second part, how USR works. I'll 
assume that if you are reading this section you 
know about converting decimal numbers to 2- 
byte integers and how a LIFO stack operates. If 
not, skip the next couple of paragraphs. Better 
still, get hold of a decent book on machine code 
and find out! 

When a USR call is made, the following things 
happen: 

a) The processor notes where it is in the BASIC 
program, and pushes this location onto the stack 
for later use as a return address. 

b) Any parameters passed are converted into 2- 
byte integers and pushed onto the stack, low 
byte first. 

c) A one-byte value containing the number of 
parameters passed (even if it is 0) is pushed onto 
the stack. 

d) the machine code routine is executed. 

e) On encountering the final RTS instruction, the 
top two bytes are pulled off the stack and used as 


the return address. All being well, this transfers 
control back to BASIC, at the next statement after 
the USR call. 

Note that I say all being well'. A number of 
things can go wrong if we’re not careful. First of 
all, there is that byte mentioned at c), sitting on 
top of the stack ready to foul things up. Unless we 
get rid of it, the processor will think it is part of the 
return address and, when the final RTS is encoun¬ 
tered. will bounce off into the lower reaches of 
operating system RAM instead of returning to 
BASIC. Consequently it is a good idea to do a PLA 
right at the start of your routine to be sure you 
don't forget it For exactly the same reason, all 
parameters have to be pulled off the stack before 
the final RTS. They can be left there until you need 
them in your routine of course, but newcomers to 
machine-code programming may find it safer to 
retrieve them at the start of the routine. They can 
always be stored in a less critical location until you 
need them. 

Remember that all parameters are converted 
into 2-byte integers, even if their value could be 
contained in a single byte, so to retrieve a one- 
byte parameter, you have to do two PLAs and dis¬ 
card the high byte. Also, don't forget that 
parameters come back off the stack with their 
high byte first. This can be a bit confusing if you 
are used to the conventional low/high' order of 
storing 2-byte numbers. Lastly, do make sure that 
your routine ends with an RTS. I know this 
sounds obvious, but it is easy to forget, especially 
if the routine uses a lot of JSRs (e.g. accessing 
ROM routines). 

On now to the third section, where we get down 
to some practical examples. Here is the simplest 
machine code routine I can think of 

PLA ;Get rid of the number of 

parameters byte 

LDA 20 

STA 710 .Store 20 in the address 
controlling screen 
colour 

RTS ;Return to BASIC 


In decimal form, this routine translates to : 
104,169,20,141,1 98,2,96. Before we can do a 
USR call though, these numbers have to be put 
into some safe area of memory. Let's use address 

continued overleaf 
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USR continued 

1 536 onwards. Here is my favourite way of load¬ 
ing machine code subroutines into RAM, though 
it is not necessarily the best. 

10 X=0:RESTORE 40 

20 READ D:IF D=-l THEM 100 

30 POKE 1536+X,D:X=X+1:GOTO 20 

40 DATA 104,169.20.141.198,2.96.“1 

100 X=USR(1536) 

As with any machine-code routine, SAVE it 
before you RUN it, since the slightest error in the 
DATA line could lock up your system. When you 
RUN it, you should find that the screen turns 
orange. Okay, it's a trivial example, you could have 
achieved the same effect by POKE 710,20, but at 
least it's a start. Notice the 96 at the end of the 
routine. This is the RTS instruction which we 
need to get back into BASIC. 

How about an example with a parameter? This 
slightly modified routine allows you to specify the 
screen colour within the USR statement. 


PLA 

.Discard the number of 


parameters byte 

PLA 

.Discard the parameters 


high byte 

PLA 

;Get the parameters 


low byte 

STA 710 

.Store it in the colour 


register 

RTS 

. Return to BASIC 


Subroutine writers note: even though this par¬ 
ticular parameter can only be a one-byte number 
(you can't put more than 255 into a colour regis¬ 
ter), the USR call will still push two bytes onto the 
stack, so we have to pull the high byte off and 
throw it away. To load this more flexible sub¬ 
routine, change lines 40 and 100 of the BASIC 
loader program above to read: 

40 DATA 104.104.104,141.198.2.96.-1 

100 X=USR (1536.90) 

This time the screen should turn red, but you can 
choose whatever colour you like, simply by alter¬ 
ing the 50 in the brackets. 

Finally (and at long last) something useful. Any¬ 
one who has used redefined character sets in 
their programs knows that, before any redefini¬ 
tion can be done, the character set has to be 
copied from ROM into RAM. This takes about 10 
to 15 seconds in BASIC, depending on the 
method used. The following machine-code 


routine does it in the blink of an eye! Alter the 
BASIC loader program as follows 

40 DATA 104,104.133,204.104.133,203.16 
9,224 

50 DATA 133,206.160.0.132.205.162,4 
60 DATA 177.205.145.203.136.208,249,23 
0 

70 DATA 204.230.206.202.208.242.96.-1 
100 X=USR<1536.10240) 

The parameter 10240 is, in this case, the 
address where the copied character set will start. 
It need not be 10240 of course, you might prefer 
to calculate where the top of your useable 
memory is and put the new character set up there, 
remembering to leave enough space for the 
screen memory and display list and 1024 bytes 
for the characters. Try changing line 100 to 
read 

100 START = 256*(PEEK(106)-20):X=USRC153 
6.START) 

When you run it for the first time, the routine 
does not look particularly fast. This is because of 
the time taken to load the numbers into memory, 
but, once there, the routine can be called as many 
times as you like-and will execute very quickly 
indeed. To see it at full speed, RUN it once then 
type GOTO 100. The real benefits arrive, of cour¬ 
se. when you use the routine more than once. You 
can copy the character set three or four times over 
(to different locations of course) in a couple of 
seconds. This is useful if you want several incar¬ 
nations of your redefined characters to get anima¬ 
tion effects of the kinds used in Space Invaders. 
That subject, however, deserves another article 
all of its own. 

In conclusion, let's look at some of the reasons 
for going to all this bother. There are two main 
ones. Firstly machine-code can do some things 
BASIC can't manage at all, and secondly, it 
executes up to 200 times faster. On the other 
hand, machine-code takes longer to write, is far 
more exacting and makes complicated tasks out 
of some things BASIC finds easy. The USR func¬ 
tion gives us the best of both worlds. We can use 
BASIC to do all the things which would be very 
tedious in machine-code, like complex arithmetic, 
or setting up screen displays, or using peripherals 
and employ machine-code for tasks which need 
to be executed at high speed like moving player/ 
missiles vertically, or reading light pens, or fine 
scrolling. 

All in all, it’s well worth making friends with 
USR. # 












A RUBBER KEYBOARD. 


The flat keyboard of the Atari 400 know instantly which keys you’ve 
isn’t very satisfactory to use. depressed. 

It simply doesn't put you in touch And by raising the keys it raises 
with the computer in the same way as the standard of your machine, 
a push button one. To set it up all you have to do is to 

Our keyboard fits snugly over your peel off the adhesive backing and stick 
present Atari 400 keyboard and does it on top of your existing keyboard, 
exactly the same job. And we’re sticking a price on it of 

Only it does it better only £19.95. 

It makes programming and game So, whichever way you look at it, it’s 

playing so much easier because you a keyboard that really stands out. 

Filesixty Ltd., 25 Chippenham Mews. London W9 2AN. England. Tel: 01-289 3059. 


Please send (qty) Keyboards at £19.95 each (including VAT and P&P). 

Enclosed is my cheque/PO made payable to Filesixty Ltd. Please charge my Access 1 

Account . .. I Total £ 

Name Euwyaa,e 

Ad dress _ 

Telephone _ Signature 


□ 


Post to: Filesixty Ltd., FREEPOST London W9 2BR. 
Trade enquiries welcome. 


Y1 
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^tarcabr presents 

,«.**•* ^ <*»»** 



and the sexiest little lady frogs you could wish to meet 

SflUflGE PCTD 



THOUSANDS OF ATARI 
FANS CANT BE WRONG 


THE TOP 


DIMENSION X 
ZAXXON 
POLE POSITION 
CAVERNS OF 
KHAFKA 
ENCOUNTER 
MINER 2049er 
RALLY 
SPEEDWAY 
SAVAGE POND 
DONKEY KONG 
PIT STOP 


fc|>Y* 


NOW AVAILABLE 
C FOR 

COMMODORE 

64 ‘ 


ATARP 


1 

2 

3 

4 

5 

6 

7 

8 

9 

10 


IF IN 

DIFFICULTY 
RING OUR 

SUPERFAST 
CREDIT CARD 
SALES LINE: 

051-487 0808 


BBC 

MICRO 


ASK YOUR 
LOCAL DEALER 
OR 

POST THIS 
COUPON 


(24 hours) 


£ 7.95 


ELECTRON 


worthy Avenue, L26 7AA. 
Liverpool 


! STARCADE SOFTWARE, 2 El 

! Please rush me. cop.es ofSAVAGE POND suitable 

i lor Atari/Commodore 64 (DISC/CASSETTE). 

! Please deb.1 by Access Card < Dal0,a “ necassary) 

i Cva i—i—i—i—r 


NumDr 


| I enclose Cheque/P.0.1 or £. 
! Name . 


• Address 
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Education 


FLAGS 

by Keith Berry 

The computer is an ideal tool for education but one of the problems is 
finding the right context in which to use it All too often programs of 
an educational nature use straight text for revision and accomplish 
little more than can be learned from a book. 

FLAGS uses the best features of the Atari - colour and sound - to 
present a Quiz or Display of the National flags of many countries. By 
running through the Display option your children (and you!) can learn 
the various national flags and follow this up with a quiz. Flags which 
are not correctly identified are summarised at the end for further 
revision. 


1 REM M M 

2 REN « by Keith Berry, « 

3 REM » 51, Brantley Road. « 

4 REN « l.rmnihan II 7IR « 

5 REN W l WHH i lHWHlHMHHim 
II REN 

IS REAR RESET,LOOP.CSET,FIN,CLEM.YES, 

NO,OS, MILTI,ECU,VEIT,TITLE 

II BATA 111,141,111,141,SSI,991,1141,1 

111, 1171,1281,1J2I, IBM 

25 REAR SCAN,SMS.RORIZ.FILL,ITR,NS,CN 

R.MC.DPLY.FAIF.AOP 

21 BATA 13*1,1471,1521. ISM, 1591,1111, 
1ISI,1191,1721.1IM,1921 
15 REAR Cl,Cl.C2,Cl,CS.Cl.ClI,C12.C11, 
C15,C1I,C17 

31 BATA I.1,2,3.5.I.II,12.11.15,II,17 
45 REAR C19,C15,C25S,IMK.CRl.CR2.CI1.C 
RS,CLS,NAR 

41 BATA 19,35,255,7*4,711,719,711,712, 
12S.I2 

II BIN ALT$(16),G$(C1),FLAG$(C12),AI$( 
II) ,NAME$(8),NISSS(39I).TEMP$(C13),BAC 
11) 

IS I0SIIB 2Ml 
71 GOSUB TITLE 

91 ? :? " Rational UaysS ®SPLAY 

or miv 

1M FM K=C1 TI 2MI: 2-PEEK (IRK): IF Z= 
47 TNEI GOTO 121 

III IF Z=58 THEN PIKE IIK,C25S:G0SUI C 
LEAR:RESTME 4M:MTI BPLV 

US NEXT W:Z=5I:G0SIB ABP:C0SUB CLEAR: 

RESTORE 4M-.GIT0 BPLY 

121 POKE INK,C255:? CNR$(CLS);" velco 

Re to flays PLEASE ENTER YOUR IAN 

E: INPIT HANES 

125 IF LEN(NAK$)<C2 TNEI 121 

111 M1=€1:I=CI:SC=CI:I=CI:T=15I:FQR It 

Cl TO 3I:DA(M)=CI:NEXT H 

141 ? CHlS(CLS):G0SUB CLEAR 

142 I=IK1 


144 IS-1NT(RND(I)*45)+C1 
14* FOR J=C1 TI I:IF DA(J)-RS THEN POP 
:*0T0 144 

141 NEXT J:BA Cl)-RS 

151 RESTORE RSUM:REA0 ALT$.FLAGS,G,P 

1,P2,P3,P4 

1M POKE CR1,P1:PIKE CR2,P2:PIKE CRI.P 
3:POKE CR5.P4 

171 ON * GOSOB NC.ECU.VEIT.OTR.NORIZ.C 

■R.SCAN.HS.MILTI.SiaS.IS 

211 IF Z=50 TIER RETURN 

291 ? ■ TNIS IS TIE FLA*":? ■ Of W 

ICI COUNTRY";:TRAP 290:1NPUT AlS 

1M TRAP 4MII 

111 ? CARS(CLS) 

121 IF AR$=ALT$ OR ARS-FlAt$ TNEI ? " 
";FLAG$;" IS-:? - CORRECT, -:NANE$: M 
!-:? :*0SUB YE5:SC-SC4C1 
111 IF AISOALTS ARB ANSOFLAGS TNEI N 
IS=NIS«C1:G0SM 1M 
141 POKE 1NK,C255:F0R N-Cl TO 4M:IF P 
EEK(INK) =C12 THEN 1M 
351 NEXT H 

1*1 POKE INK,C255:IF 1=11 TNEI GOTO FI 

N 

171 GOTO LOOP 

111 ? " NO, -KANES« IT'S -;F 
LAIS:? :10SOB NO 

315 TE»$=FL AGS :LI=LEN (FLAGS): IF LN<C1 
3 TNEI FOR Z=IN*C1 TO C11:TENP$CZ)=* " 
:NEXT Z 

391 M2=H1*C11:NISSS(M1.K2)=TEMPS:K1=K1 
♦ClI 

195 RETURN 

411 BATA SIERRA LEME,SIERRA LEONE.5,2 
12,12,118,21 

402 BATA SALVABOR.EL SALVABM.5,141,12 
.141.24 

111 BATA CHAO.CHAB,3,114.2*.52,120 

414 DATA HAITI,HAITI,4,52,I,I.121 

415 BATA SIAN,THAILAND,9.52,12.114.26 
4M BATA ANDORRA, AIBORRA .5,112,24,52,1 

21 


417 BATA VOLTAIC REPUBLIC.UPPER VOLTA, 

5.1.12,52,128 

411 BATA ARGENTINA,ARGENTINA,5.Ill,12, 
111,1 

419 BATA NORMAY,NORWAY,7,52,12,112,212 
411 BATA B0L1VIA.BILIVIA.5.52.24,19*.I 

411 BATA FRANCE.FRANCE,1,114,12,52.121 

412 BATA WESTERN SAMOA,N.SAMOA.8.52.52 
.114.12 

411 BATA HOLLAND.NETHERLANDS.5.52,12,1 
12.121 

414 BATA MALTA G.C..MALTA,1,52.12,12,2 
4 

415 BATA MADAGASCAR,MALAGASY.11,12.52, 
190,1 

411 BATA ALAND ISLANDS,AALAND,7,131,24 
.52,18* 

417 BATA EIRE.IRELAND,1,190,12,24,121 

418 BATA HELVETIA.SWITZERLAND,II.I.52, 
12,111 

419 BATA AUSTRIA,AUSTRIA,5.52.12.52.12 

I 

421 BATA ABU DHABI.ABU DHABI,4.52.52,1 

2,121 

421 BATA ITALIA.ITALY.1,19*.12.52.121 

422 BATA GUATEMALA.GUATEMALA,1,148,12. 
141,24 

421 BATA SWEDEN,SHEDEN.7,111,118.21.11 

• 

424 BATA EOUABOR.ECUABOR.2.24.148,52.2 

II 

425 BATA WSTERN GERMANY,NEST GERMANY, 
5,0,52.248.121 

42* BATA TONGA ISLAND.TONGA,I.52,52.12 
.121 

427 BATA SOUDAN,MALI,1.191,2*.52.II 
421 BATA HUNGARY.HUNGARY,5.52.12,191,2 
4 

429 DATA AJUAN,AJMAN,4,52,12,12.121 
411 BATA DANMARK.DENMARK.7.52.52,12,12 

I 

431 BATA PERSIA.IRAN.5,191,12,52.121 

432 BATA GUINEA,GUINEA.1,52,26,196.II 
431 BATA TRAISKEI.TRARSKEI,5,51,12,19* 
.21 

414 BATA COSTARICA,COSTA RICA,9.11*.12 
.52.2* 

415 BATA FAROE ISLANDS,FAROE,7,12.112, 
52,198 

41* BATA LUXEWOURG,LUXEMBURG,5,52,12, 

111,120 

437 BATA IVORY COAST.IVORY COAST.1,24, 
12,196,114 

431 BATA SUOMI,FINLAND.7,12.118,111,22 

► ► 
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FLAGS continued from page 29 


435 DATA GABOR,GABON.5.156,24.114,118 
448 DATA PERU,PERU,3.52,12.52.136 

441 DATA NIGERIA,NIGERIA,3,156,12,156, 
24 

442 DATA BULGARIA,BULGARIA,5,12,156,62 
,134 

443 DATA BENIN.DAHOKY. 11.156.26.52.12 
0 

444 DATA BEL6IUM.BELGIUM.3.0.26.52.1O 

445 DATA ETHIOPIA,ETHIOPIA.5.156,24.52 
,128 

446 DATA ICELAND,ICELAND,7,114,12.52,1 

e 

447 DATA Z.END,8,8.8.8,8 

840 GRAPHICS C18:P0KE CR1,C12:P0KE CR3 
,8:P0NE 711,118:POKE CR5.52:? BC6." 

n n h a &• 

850 ? BC6 

860 ? tSC6:"AT THE END OF THE" 

878 ? NC6;''TEST, "JNAKS;", YOU" 

888 ? MC6:"HAVE SCORED ":SC:" OUT" 

050 ? BC6:"0F M ;I; M ," 

500 ? DC6 

’18 ? KOS'^nSH 

BW 

512 Z=PEEK(1NK):IF Z<>C12 THEN 512 
520 GRAPHICS C0:POKE NAR,C1:P0KE 752,C 
u? :? :? :? M national flag 

5 w 

«5 PORE CR3,C12:P0KE C R2,C8:P0SITI0N 

ci.c6:? 'tnanmni 

M" 

530 ? :? :? NissS:? :? -look for them 
IN DISPL AY NODE." :POKE INK.C255:? :? : 

? "Press miMM to RUN ^in: n 
535 Z=PEEK(INK):IF Z0C12 THEN 535 
540 RUN 

558 POKE MAR,C0:GRAPHICS C3:P0KE CR3.C 
0:A=PEEK(568)*PEEK(561)*256 
560 IF PEEK(A)<>66 THEN A=A«C1:G0T0 56 
0 

570 POKE A,70:POKE A«C3,C6:P0KE A*4,C6 

:POKE A«C5,C6 

588 RETURN 

550 FOR N=C1 TO C3 

1000 FOR L=CO TO C15:SOUND C0.60.C10.L 

:SOUND Cl,40,C10.L:NEXT l 

1018 FOR L=C15 TO C0 STEP -Cl:SOUND CO 

,58,C18.L:SOUND Cl,C10.C10.L:NEMT L 

1828 NEXT N 

1030 RETURN 

1040 FOR N=C1 TO C3 

1050 FOR L=C15 TO C8 STEP -0.25 

1068 SOUND C1,200,C12,L 

1070 NEXT L 

1088 NEXT N 

1050 RETURN 

1100 COLOR Cl:FOR P-Cl TO CIO 
<110 PLOT C5,P:DRAMT0 C15,P:NEXT P 


1128 COLOR C2:F0R P=C1 TO 5 
1130 PLOT 16,P:DRAMTO C35.P:NEXT P 
1140 COLOR C3:F0R P=C10 TO CIO 
1158 PiOT 16,P:DRAMT0 C35,P:NEXT P 
1160 RETURN 

1170 COLOR Cl:FOR P=C1 TO C3 
1180 PLOT CS.P:DRAMTO C35,P:NEXT P 
1150 COLOR C2:F0R P=4 TO C6 
1200 PLOT C5,P:DRAMT0 C35.P:1EXT P 
1210 COLOR C3:F0R P=7 TO C12 
1220 PLOT C5,P:DRAMT0 C35.P:NEXT P 
1230 COLOR C2:F0R P=C13 TO C15 
1240 PLOT C5.P:DRAMT0 C35.P:NEXT P 
1250 COLOR Cl:FOR P=16 TO CIO 
1260 PL0T C5,P:DRAMTO C35.P:NEXT P 
1270 RETURN 

1280 COLOR ClrFOR P=C1 TO 5:PIQT C5.P: 

DRAMTO C35,P:REX1 P 

1250 COLOR C2:F0R P=C10 TO 14:PL0T C5. 

P:DRAMTO C35.P:NEXT P 

1308 COLOR C3IF0R P=C15 TO 20:PL0T C5, 

P:DRAMTO C35.P:NEXT P 

1310 RETURN 

1320 C=C1:COLOR C:PLOT C15.C17:DRAMT0 
C15.C0rDRAHTO C5.CO:POSITION C5.C17:G0 
SUB FILL 

1330 C=C2:C0L0R C:PL0T 25,C17:DRAMT0 2 
5,C0:DRAMI0 C15.C0:P0SITI0N C1S.C17:G0 
SUB FILL 

1340 C=C3:C0L0R ClPLOT C35.C17:DRANT0 
C3S.C0:DRAMTO 25.CO:POSITION 25,Cl7:GO 
SUB FILL 
J350 RETURN 

1360 COLOR C1:F0R P^CO TO C17 
1378 PLOT C5.P:DRAMTO C35.P:NEXT P 
1380 COLOR C2:F0R P=7 TO 11 
1350 PLOT C5.P:DRAMTO C35.P:REXT P 
1400 COLOR C2:F0R P=C12 TO 16 
1410 PLOT P,CO:DRAMTO P,C17:NEXT P 
1420 COLOR C3:F0R P=C13 TO C15 
1430 PLOT P,CO:DRAMTO P.C17:NEXT P 
1440 COLOR C3:F0R P=8 TO CIO 
1450 PLOT C5,P:DRAMT0 C35.P:NEXT P 
1460 RETURN 

1470 COLOR C2:F0R P=CO TO C10:PLOT CIO 

,P:0RAMTO 30,P:NEXT P 

1480 COLOR C3:F0R P=C2 TO 16:PL0T C15, 

P:DRAMTO 21,P:NEXT P 

1450 COLOR C3:F0R P=8 TO C10:PL0T C12, 

P:0RAKTO 28,P:REXT P 

1500 RETURN 

1510 END 

1520 COLOR Cl:FOR P=CO TO C5:PL0T C3.P 

:DRAMTO C35,P:NEXT P 

1530 COLOR C2IF0R P=C6 TO lliPLOT C3,P 

lORAMTO C35,P:REXT P 

1540 COLOR C3:F0R P=C12 TO C17:PL0T C3 

,P:DRAMTO C35,P:NEXT P 

1550 RETURN 


1560 POKE 765,C 

1570 XIO C18,BC6,CO,0, n S:" 

1580 RETURN 

1550 C=Cl:COLOR ClPLOT C35.C18:DRAMTO 
C35,C0:DRAMT0 20,C0:P0SITION 20, CIO .'GO 
SUB FILL 

1600 C=C2:COLOR C2:PL0T C15,C18:DRAMT0 
C15,5:DRAMT0 C5,5:P0SITI0N C5,C18:G0S 
UB FILL 

1610 C=C3:C0L0R C:PLOT C15,8:DRAMT0 Cl 
5,0:DRAMTO C5,C0:P0SITI0N C5,8:G0SUB F 
ILL 

1620 RETURN 
1630 GOSUB OTR 

1640 COLOR C0:PL0T C12.C2:PL0T C12.C6: 
PLOT 8.C3.PL0T C17,4:PL0T 14.CS:RETURN 

1650 GOSUB OTR 

1660 COLOR C1:F0R P=C3 TO C5:PL0T 8.P: 
DRAMTO 16,P:REXT P 

1670 FOR P=ll TO C13:PL0T P,C1:DRAMT0 
P.7.NEXT P 
1680 RETURN 
1650 GOSUB OTR 

1700 COLOR CO:PLOT C6.C2:DRAMT0 8,C2 
1710 PLOT 7.C1.-DRAMT0 7.C3:RETURN 
1720 READ ALT$,FLAGS,G,PI,P2.P3.P4 
1730 IF FLAG$="END" THEN RESTORE :G0T0 

70 • 

1740 GOSUB CSET 

1750 ? CNR$(CLS):FOR 5=C1 TO C10(LEN( 

.... 5:? FI AGS:GOSUB 

FANF 

1760 POKE INK.C255JF0R KrCl TO 400.IF 
PEEK(INK)=C12 THEN 1780 
1770 NEXT N 

1780 POKE INK,C255:GOSUB CLEAR 
1750 POKE 77,C0:G0T0 DPLY 
1800 FOR 5=C1 TO C3 

1810 FOR V=0 TO C12:S0UND C0.150.C10.V 
:SOUND Cl,151,CIO,U:SOUND C2.152.C10.V 
:NEXT V 

1820 FOR U=C15 TO CO STEP -C5:SOUND CO 
,150.CIO,M:SOUND C1,151,C10,U:S0UND C2 
,152,C10.V:NEXT V 
1830 NEXT S 

1840 T=T-C10:IF T <50 THEN T=150 
1850 FOR OzCO TO C15:S00ND CO.T.CIO.U: 
SOUND Cl,T<C1,CIO,V:SOUND C2.T*C2,C10, 
U:NEXT U:FOR ltd TO SOLENT M 
I860 FOR V=C15 TO CO STEP -0.25:S0UND 
C0,T,C1O.V:SOUND Cl,T*C1.CIO,0:SOUND C 
2,T*C2,C10,V:NEXT V 
1870 RETURN 

1880 POKE MAR,C0:GRAPHICS C3:P0KE CR3, 

CO:A-PEEK(560)*PEEK(561)*256 

1850 IF PEEK(A)<>66 THEN A=A«C1:G0T0 1 

850 


i 


» 


continued on page 39 
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THE CREATOR 


A PLAYER MISSILE GRAPHICS 
EDITOR 

A POWERFUL UTILITY WHICH WILL 
DESIGN UP TO 99 IMAGES WHICH 
CAN THEN BE SAVED FOR LATER 
USE IN YOUR OWN PROGRAMS. 

25 POWERFUL COMMANDS 

19 in COMMAND mode and 6 in EDIT mode 
Including: ROTATE. INVERT. ANIMATE and 


more. 


Available NOW 
on TDK cassette £10 
orMEMOREX disk £15 


Send s.a.e. for 
further information. 


REQUIRES 48K 
Mall Order only. 

SUPERSOFT, 

15. Woodbrooke Road. 
Birmingham, B30 1UE 


CONTACT 


ATARI 400. 600XL. 800. 800XL 

ART ATARI (16k) Crvdt*' graphic masterpieces with your 
Atan Up to 80 different colours can be displayed at once Uses h»-res 
graphics mode 7 5 Finished pictures can'be saved to tape for 
redisplay £4.50 

BLACKJACK (16k) Features hi-res card display Can you 
break the bank? £2 £Q 

PICTURE PUZZLE (32 k) Can you recreate the onginal 
picture? Two hi res pictures to choose from £3.50 

20 difficulty levels 

Cheques and P.O.'s to P.F. SOFTWARE. 

14. Kirkstall Avenue. 

All price, inclusive ol p&p. 


| UICTAGRAPH PLOT WINDOW 
| GRAPHICS AID FOR 
{ATARI 400,800,600,800XL 
jSCREEN AND 1020 PRINTER 
5 NOW DISTRIBUTED BY 
HI-TECH 8IRMJNGIW1 

ASK FOR IT BT NAflt 
: AT YOUR LOCAL ATARI SHOP 

■I 

: 


SEIKOSHA GP-100A PRINTER: Can anyone tell me 
how to get graphics or a simple screen dump? Neil 
Scott 110. Coventry Road. Bulkington. Nr. 
Nuneaton. Warks. CV12 9NJ. Tel. 0203 316421 

CORBY USERS GROUP: I am thinking of setting upa 
User Group in the Corby area. Anyone interested? 
Marco Dawson. 15, Tyne Road. Corby. Northants. 
NN17 2HU 

ASSEMBLER PROGRAMMING: Anyone in my 
area interested in swapping ideas etc? Meet or write. 
Steve Hill, 5 Broadacres. Durkar, Wakefield. W.Yorks, 
WF4 3 BE 

JOURNEYMAN: I travel regularly throughout Yorks, 
Lancs. Cheshire. Notts and Derbyshire and would like 
to meet other addicts. Give me a ring. Alan Goldsbro. 
51 Inglewood Place. Leeds. LSI4 6HH. Tel. Leeds 
600754 

OXFORD USERS GROUP: Any support for a User 
Group in Oxford? Please contact Matthew Spencer 
with any ideas etc. Tel. Stonesfield 757 or write 16, 
Pumbro, Stonesfield. Oxford. 0X7 2QF 

ANALOG: Back issues 1 to 7 required urgently. Tel 
Mr L Lazarus 01 *202 8331 

LIGHT PEN: Doyouhave a light pen program in Basic 
that will draw in Graphics 8? Please contact Jonathon 
Russell. 269 Campkin Road, Cambridge, CB4 2LE. 
Tel.0223 62006 

NORTHERN IRELAND GROUP: Feeling left out? 
Anyone interested in a User Group in the Belfast area 
with the possibility of publishing a book and a 
software library? Please write with s.a.e. to Frankie 
Smyth. 62. Orchardville Ave., Belfast BT10 0JH 

GHOST TOWN/THE COUNT: I am completely 
baffled about how to shoe the horse in Ghost Town or 
get past the coffin in The Count Can you help? 
Anthony Pottle, 22. Greenacres Drive, Lutterworth, 
Leics, LEI 7 4TG 

PAGE 6 BACK ISSUES: The following readers 
require copies of issues 1 & 2 

Derek Ross. 11 7 Moss-side Road. Shawlands, 
Glasgow G41. Tel. 041 632 5737 

Martin Sisson, 45, Westerfield Way, Silverdale. 
Nottingham. NG11 7ET 

ZORK 1 : I am just starting the perilous journey and 
would welcome exchanging ideas or information in 
writing with another on the same journey. John 
Dimmer, 71 Duncan Drive, Elgin, Moray. Tel. 0343 
44695 

850 INTERFACE: Anyone got one to sell? John 
Dimmer (address as above). 
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THE SOFTWARE REVIEWS 


* * * STAR GAME * * * 


ATTACK OF THE MUTANT CAMELS 
LLAMASOFT 16K 1/2 PLAYERS 

In the words of the hairy Llama man himself. Like. 
WOW. man....this is a real blast! Mutant Camels 
comes to the Atari with a vengeance. Not just a 
translation but a full blown adaptation using all of 
the Atari's powerful features including display list 
interrupts, scrolling, player missile graphics, 
animation and AWESOME sound. Llamasoft have 
been bandying the word AWESOME about for 
some time but now that he has had the chance to 
pull the stops out of an Atari, I am sure that Jeff 
Minter now knows what AWESOME really means. 
You don't really need to read any further, just get 
your £7.50 (yes, that's all) off to Llamasoft and wait 
for a superbly packaged, excellently programmed, 
top quality cassette to drop through your door. You 
won't regret it 

For those of you who don't know anything of the 
Llama man's games, let me give you some details of 
this one. It helps to know a little about the game's 
designer, Jeff Minter, a kind of young eccentric in 
the grand English tradition who lives in a sixties 
time-warp, is in love with Llamas and writes wierd 
games about Mutant Camels and Sheep in Space. 
Don't let the eccentricity fool you, the man is a 
brilliant programmer and has his finger right on the 
pulse of the eighties micro/arcade scene. The 
game features an attempt by the race of Zzyax to 
stop mankind from leaving Earth and exploring the 
galaxy by using genetic engineering on camels to 
create 90 foot high, neutronium-shielded. laser 
spitting beasts designed to bring death and des¬ 
truction to Earth. The beasts can be destroyed by 
neutron-canon bolts from a highly manouverable 
fighter ship and that is your task. The Camels march 
relentlessly across the screen and you must 
destroy them one by one by pumping them full of 
neutron bolts. Your ship is shielded but loses shield 
power each time you collide with a Camel or are hit 
by a laser bolt until nine hits destroy the ship. The 
colours are brilliant with display list interrupts or 
GTIA forming the sky, pyramids on the horizon and 
a Torward scrolling foreground. If you destroy all 
Camels on a level you go into hyperwarp phase and 
must avoid missiles as the terrain scrolls by at 
incredible speed. Colours on the hyperwarp are 
even better. 


The only game to have been reviewed in PAGE 6 
which has been given the title STAR GAME! Partly 
because there has not been a better Atari game at 
this price, partly because it proves to the world that 
Atari is the best home computer around and last but 
not least because any man that is mad enough to 
admit publicly that he loves llamas must be alright 
The fact that he can write brilliant programs helps 
too. 

Atari software generally sells in quite small 
quantities compared with other micros and if Jeff 
Minter is to adapt his other games it will require you 
to show your dedication and support by buying this 
in your thousands. If you love arcade games, you 
could not spend £7.50 more effectively. Buy it get 
all your friends round and show them what a great 
game on the best micro looks like and get them to 
buy both an Atari and Attack of the Mutant 
Camels. 

Les Ellingham 


GWENDOLYN* 40K DISK 

ARTWORX 1 PLAYER 


Gwendolyn is an arcade-adventure' of the type 
which is fully joystick controlled and comes on two 
disks. The arcade adventure is much more graph¬ 
ically oriented than the text based adventures and 
Gwendolyn includes a certain amount of animation 
and sound. Whilst there are puzzles to solve the 
choices are limited and the plot is therefore not as 
complex as most text based adventures. The 
graphics are reasonably good but use artifacting 
which does not lend itself well to the PAL system 
and the images are therefore lacking in colour. At 
first I was quite disappointed with the game mainly 
because of the limitations of joystick control and I 
wandered around for a long time doing absolutely 
nothing, but once I was underground it became 
more interesting. Eventually I became hooked as 
more progress was made. One of the attractions of 
a two-disk adventure is to get onto the second disk! 
Gwendolyn is much more suited to novice or 
intermediate Adventurers or those who like some 
graphics and action. Experienced text Adventurers 
would probably find the joystick control too limiting 
and are likely to solve the adventure in a short 
time. 


Les Ellingham 
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A ATARI ZOOMSOFT 


SOFTWARE 

SPECIALIST 



MR COOL - Be ready for a 
new addiction that will be 
going around soon Mr. Cool- 
mania." This challenging new 
game will have people 
dodging fireballs and springs 
in their sleep A fastmoving, 
smoothly animated game that 
will Keep you busy for hours. 



OILS WELL - An addictingly 
fun arcade game that will 
gobble its way to your heart. 
Drill underground to find oil 
deposits while avoiding the 
nasty creatures that can 
destroy your oil pipe Multiple 
screens and changing levels of 
difficulty complete the 



The PROTECT 

The PROTECT allows you to 
write to both sides of any disk. 
Write protect without 
LABEL S. No more cutting of 
notches that cause disk errors. 
Just plugs in. No soldering, 
takes only a few minutes to 
install. 

Price £13.95 


GAMES 

ADVENTURE INTERNATIONAL 


The HULK cass 7.95 

The HULK disk 17.95 

BRODERBUND 

DROL disk 24.95 

LODE RUNNER disk 24.95 

SPARE CHANGE disk 24.95 

CALISTO 

WARLOCK cass 14.95 

WARLOCK disk 14.95 

CHANNEL 8 

GOLDEN BATON cass 8.95 

COSMI 

SLINKY cass 8.95 

SLINKY disk 12.95 

AZTEC CHALLENGE cass 8.95 

DATAMOST 

MR. ROBOT disk 21.95 

DATASOFT 

BRUCE LEE cass 14.95 

BRUCE LEE disk 14.95 

DALLAS QUEST disk 14.95 

FIRST STAR 

BOULDER DASH cass 20.95 

BOULDER DASH disk 20.95 

BRISTLES cass 20.95 

BRISTLES disk 20.95 

FLIP FLOP cass 20.95 

FLIP FLOP disk 20.95 

FUNSOFT 

FLAK disk 14.95 

SNOKIE cass 10.95 

SNOKIE disk 13.95 


cass 14.95 
disk 14.95 

cass 8.95 

cass 8.95 
disk 12.95 


disk 21.95 

cass 14.95 
disk 14.95 
disk 14.95 

cass 20.95 
disk 20.95 


DISK COLLECTOR 

DISK COLLECTOR is a 
complete disk cataloging 
system. 13 options to choose 
from. Stores over 900 
filenames. No more going to 
DOS to see whats on each disk. 
Run files. LOAD files. A must 
for all programmers. 

Price £18.95 


BASIC COMMANDER 

Single keystrokes allow you to LIST. 
SAVE. ENTER, LOAD or RUN files. 
You never need to type DOS again. 
View the entire disk directory. 
RENAME. LOCK. UNLOCK, even 
FORMAT disks from BASIC. 
Automatic line numbering, block 
delete, re-numbering. Also 3 keys 
for you to program. 

Price £24.95 


GAMESTAR 

STAR LEAGUE 
INFOCOM 
ZORK 1 
ZORK 2 
ZORK 3 
LIAMASOFT 
GRIDRUNNER 
MICROPROSE 
SPITFIRE ACE 
SPITFIRE ACE 
SOLO FLIGHT 
SOLO FLIGHT 


GAMES 


disk 

20.95 

disk 

2495 

disk 

2495 

disk 

27 95 

cass 

7.50 

cass 

9.95 

disk 

12.95 

cass 

14 95 

disk 

14 95 


UTILITIES 

O/SYSTEMS ACTION 
MAC/65(OS/A«) 

BASIC XL 

MMG 

BASIC DEBUGGER 
BASIC COMMANDER 
MAIL LIST 

TRONIX 

SAM. 

P.M ANIMATOR 
TELETARI 
PENGUIN 
GRAPHICS MAG. 


cart 66.95 
disk 57.95 
cart 66.95 

disk 25.95 
disk 25.95 
disk 34.95 


disk 41.95 
disk 25.95 
disk 27.95 


44.75 


ALL THE LATEST AMERICAN TITLES NOW IN STOCK. 100 S OF TITLES 
TO CHOOSE FROM WRITE OR TELEPHONE FOR A FREE 
CATALOGUE NOW NO OBLIGATION IF YOU HAVE TROUBLE 
FINDING A TITLE THEN DON T HESITATE TO CALL US WE 
KNOW THE ATARI BEST. 








BLUE THUNDER 1 6/48K CASS. 
RICHARD WILCOX 1 PLAYER 


Blue Thunder is a helicopter rescue mission 
similar to Choplifter but if you have not seen that 
game or could not afford it you can get similar 
enjoyment from Blue Thunder for just £9.95. Your 
mission is to rescue your comrades from a remote 
island whilst avoiding hazards such as ground and 
sea based missiles, armoured barrage balloons and 
electric storms. Your jetcopter is armed and can 
destroy the nuclear reactor besides which your 
comrades are held captive but not the gun emplace¬ 
ments which you must pass. The best feature of the 
game is the control of the helicopter which is quite 
realistic (a fact confirmed by a reader in the RAF!) 
and is fairly complex to master. The joystick 
controls the direction of the helicopter in the normal 
left, right, up and down motion but with the trigger 
pressed, the helicopter can be turned. A medium 
press will turn through 90° and a long press 
through 180°. As the trigger is also used to fire 
missiles (via a short press) it can take some time to 
master the controls. The helicopter banks as it turns 
and heads away and looks very good. The back¬ 
ground graphics are of reasonable standard and the 
game scrolls over six screens. In. the short time 
available for review I was not able to rescue 
anybody so there would appear to be some 
challenge to the game which should keep you 
occupied for many hours. Blue Thunder is not a fast 
paced game but requires plenty of control and is a 
worthy addition to your collection. 

Les Ellingham 


DAN STRIKES BACK 16K 

ENGLISH SOFTWARE 1 PLAYER 


So you weren't lucky enough to win the real 
diamond in Diamonds? Never mind you can at least 
now carry on with the adventures of Dan but this 
time purely for pleasure. Many of the characters 
from Diamonds are here including the infamous 
Brian the Blob and the idea is similar in that you 
need to descend various levels to reach the Great 
Diamond which Brian has now stolen from Dan and 
stored in an underground vault Dan does not dig in 
this game but rather drops and climbs various fixed 
platforms clearing mushrooms as he goes. I found 


Dan Strikes Back to be much more interesting than 
Diamonds as there is more thought required to 
work out the correct directions to clear each level. 
Various sections have gates which open and close 
making it necessary to work out moves in advance 
to ensure that you do not get trapped. One of the 
problems is that Brian is also in the vault and follows 
you everywhere. 

Before you can gain the next level you must cover 
and clear each part of the current level and you have 
the chance to score bonus points by collecting 
magic toadstools which occasionally spring up. On 
level 3 a giant spider prowls the vault leaving webs 
which you must break through and which delay 
your progress. The puzzles of how to reach each 
part of the vault get more complex at each of the six 
levels until finally you can see the Great Diamond. 
All you have to do then is get back out again with 
Brian and all his nasty friends in hot pursuit If you 
enjoyed Diamonds you should also enjoy Dan 
Strikes Back. I certainly found it more satisfying. 

Les Ellingham 


GEOMETRY ' 16K CASS. 

SOFLOW SOFTWARE 

Geometry is the first in a series of educational 
software from Soflow Software designed as a 
revision aid for the 0 level syllabus. The program 
comes in several sections and uses not only 
diagrams and text on screen but also that unique, 
but much underused. Atari feature, the audio sound 
track. Each section of the program is introduced 
and commented on by a clear female voice on the 
soundtrack and care has been taken to ensure that 
the soundtrack supplements the program and does 
not merely repeat what is on screen. The program 
itself requires interaction from the user in 
answering questions at various stages. Unfort¬ 
unately the subject itself was too complex for me(!) 
but I have been assured that the content has been 
checked for accu racy by a qualified teacher so there 
should be no complaint in this area. 

Many parents have bemoaned the lack of educa¬ 
tional software for the Atari and the little that has 
been published is mainly for pre-school children. 
Writing software for children of secondary educa¬ 
tion age is not easy but the Softswot series provides 
a good start in this neglected area. 

Les Ellingham 











MUSIC CONSTRUCTION SET 
ELECTRONIC ARTS 48K DISK 

In the wake of so many graphics programs and 
utilities, the sound and music capabilities of Atari 
computers seems to have been ignored, but now 
Music Construction Set from Electronic Arts has 
put that to rights. 

The screen consists of two staves (the Bass and 
Treble clefs) and a graphic menu. The menu 
contains a complete set of notes and rests, a time 
signature indicator, a time counter and nine 
symbolic pictures, or icons, representative of a 
certain command, e.g. a disk for disk commands. 
The approach is very similar to Pinball Construction 
Kit. The Hand icon is the most important as this 
contols the entire workings of the MCS. The hand 
can be controlled from a choice of controllers such 
as joystick and keyboard or the Atari Touch Tablet 
or Koala Pad. 

The hand is used to control the speed, sound and 
volume, time signature and for manipulation of the 
icons and even to change the key in which the 
music is played. Most importantly, however, it is 
used to write music. By placing the hand on a note, 
rest or other musical notation such as ties, octave 
raisers etc., and pressing the trigger, the item can 
be picked up and placed anywhere on the staves. 
The facility is ideal for music development or 
copying from manuscripts. 

In the middle of the screen are five gauges 
which give complete control over speed, volume 
and various instrument effects such as piano, 
drum, accordian and vibrato. The editing facilities 
are also extremely efficient using the cut and paste' 
technique. Bars can be cut out and replaced any¬ 
where in the same piece of music or even another 
piece loaded from disk. It is also possible to print the 
music on a dot-matrix printer giving a full printout of 
the score. 

There are drawbacks, however, to what is other¬ 
wise an excellent program. In the disk command 
mode, if load or save are not specified and the 
filename begins with F, the program will format any 
disk in drive 1 without chance of verification. 
Secondly, it can only take 70 bars of music from 
either stave in memory at once which is a little short 
and might not allow a full piece of music to be 
worked on at any one time. Thirdly the controls are a 


little coarse and take practice to operate correctly. 

The MCS is set up to use only three of the Atari's 
four voices in order to give better bass notes but 
you can select four voices if required. It is not only 
the bass notes that sound good however, the whole 
musical quality must be heard to be believed. 

Gary Sabin and Julian Bailey 


DUELLIN DROID 16K 

ENGLISH SOFTWARE 1 PLAYER 

If you are looking for a fast action robot-shooting 
game, give Duellin' Droid a look for it certainly packs 
some fast action. The game itself is very simple, all 
you need to do is shoot all of the creatures in the 
arena and score bonus points by rescuing the 
Little Pink People'' who wander about The main 
appeal is the speed and there are 99 levels to 
survive. Graphically it is very strange, written 
possibly in Antic mode 5(?), and it looks a little 
disappointing at first Once into the game however 
this is not so important, it is just a question of 
surviving those 99 levels. 

Les Ellingham 


= 

-TOP 

TEN: 

— 


1 

ENCOUNTER 

Novagen 

16K 

C 

2 

SNOWBALL 

Level 9 

32K 

C 

3 

BASIC XL 

O.S.S. 

16K 

ROM 

4 

ACTION! 

O.S.S. 

16K 

ROM 

5 

BRUCE LEE 

Datasoft 

32K 

C/D 

6 

THE HULK 

Adventure 

International 

24K 

C 

7 

DANGER RANGER Microdeal 

16K 

C 

8 

A.C.E. 

English 

Software 

16K 

C 

9 

COLOSSAL 

ADVENTURE 

Level 9 

32K 

C 

10 

MAC 65 

O.S.S. 

16K 

ROM 


Chart compiled 20/7/84 
by The Atari Center 
021 643 9100 
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= PAGE 6 


Utility 


Issue 11 = 


VARSORT 1 


This is the first of two Variable utility programs. 
The second VARSORT2 which allows you to add 
descriptions to the variables and which can be 
accessed from this program will be published next 
issue. Whilst written for disk users, the program 
can be easily converted for cassette. 

When writing a program which uses quite a lot of 
variables, it is very easy to forget which variables 
you have already used. It is possible to obtain a list 
of these from the computer itself but they will be in 
the order of entering. This program is 'ENTERed' 
from disc and tacks itself on to the end of your 
program ( its line numbers run from 32000 
upwards). When ENTERed' type GOTO 32000’ 
and the program will clear the screen and print, in 
three columns, all the variables you have used so 
far. You will then be asked to press any key for a 
sort’. The sort section is the one used in a program 
published in Page 6 some time ago although in this 
version you can watch its progress on the screen. 
When completed, the sorted list of variables is 
displayed on screen, again in three columns. You 
are then asked if you want to print them or put them 
to disk * the filename is fixed. Finally you have the 
option to call VARS0RT2 or finish. A word of 
warning - whichever option you choose will erase 
your original program from memory - so SAVE IT 
FIRST!!!. 

The program runs as follows:- 

FETCHING THE VARIABLES 

Line 32000 dimensions the strings and array used. 
The array is cleared. 

Line 32010 sets the mode to zero: sets the 
colours: clears the cursor. 

Line 32020 prints the heading asking you to wait 
for the variables to be fetched. 

Line 32030 sets a TRAP: OPENs a channel for 
input from keyboard. 

Line 32040 sets a loop XX which will run from the 
address contained within memory locations 1 30 
and 1 31 to that in 1 32 and 1 33 LESS47. The first 
is the beginning of the variable list - the last is the 
end minus 1. Why 47 then? The variables used in 
this program occupy 46 bytes and. as we don't 
want them listed we stop the list just before they are 
reached. 

(A word of explanation - the variables are listed 
nose to tail with no gaps in between. What makes 
it easy to pick out each seperate variable is the way 
in which the last character is stored - as an 
INVERSE character. The AT ASCI I number for an 


Inverse Character is 128 greater than that for a 
normal one). 

Line 32050 looks at the value contained in ‘XX’, if 
less than 1 28 then its value is passed on to XXX’: 
GOSUB’s line 32100 and on returning GOTO's 
32070. 

Line 32060 is only reached when a PEEK at 'XX' is 
greater than 1 28 and when this is so then XXX’ is 
made equal to'XX’ but less 1 28: GOSUB's 32100 
and, on return, is immediately GOSUBbed again to 
line 321 10, for it obvious that a complete variable 
name has been obtained. 

Line 32070 sends you back for another pass 
through the loop until finally the list is exhausted 
whereupon the program GOSUB’s to line 32440 
(the screen print-out). 

Line 32080 prints the request to press any key for 
the sort to begin and then waits for your input 
Line 32090 clears the screen and GOTO's line 
32150. 

Line 32100 adds the individual characters of the 
variable (in XXX ) to a string XX$’. 

Line 321 10 is brought into use when the complete 
variable is contained in XX$'. the string is then 
checked for length, i{ not 10 characters then it has a 
dot added until it is. As the final string will contain all 
the variables, each sub string must be of a fixed 
length so that we can extract it! 

Line 321 20 adds XX$ to that final long’ string, 
XAR$ and XX$ are then cleared ready for the 
next variable. 

Line 321 30 is the error line which the TRAP, when 
sprung, sends the program to. 

Line 32140 sends you back to line 32010 to have 
another try. 

THE SORT 


Line 321 50 is the first line of the sort section. The 
bell is rung, warning you of the start: 'XX' is used 
again, this time to represent the length of each 
variable sub string. A loop is started - 'XZX1' - 
running from 1 to the length of XAR$' divided by 
XX", this of course gives you the number of 
variables in the string: XX1' is equalled to the pass 
through the loop XZXV times 'XX': XR0W is 
equalled to the number of variables in the string. 
Line 32160 Another loop XZX2’ is started 
running from 1 to the number of variables: ‘XX2’ is 


equalled to XZX2’ times XX’. This second loop 
completes a whole cycle whilst the first loop is 
stationary on one item at a time. This is used by the 
line 32180. 

Line 32170 prints the loop positions as they are 

executed. .. , 

continued on page 38 










a variable sorting utility by C.LStone 


31995 REM mmmk m mmm mmmmmmmmm m mmmmmmm 

31996 REM » VARSORT 1 « 

31997 REM « BY C.L. STONE 14/1/84 * 

31998 REM mm mmm m mm mm mmmmm m mmmmmmmmm 

31999 REM 

32808 DIM XX$(10),XAR$(128G),MAR1$(128 
0),XRQM<128):XR0HC1)=0:XR0H(128)=XROH: 
XROH(2)=XROM 

32010 GRAPHICS 0:POKE 710.16:POKE 712. 

130:POKE 709,26 * POKE 752,1 

32020 POSITION 9,1:? "VARIABLES BEING 

FETCHED PLEASE WAIT 

•• 

32830 TRAP 0: TRAP 32130:CLOSE ttl:OPEN 
til. 4,0, "K :" 

32040 FOR XX=PEEK(130)«PEEK<131)«256 T 

0 PEEK (132)♦PEEK C133)*256-47 

32050 IF PEEK (XX)<128 THEN XXX=PEEKCXX 

):G0SU8 32100:GOTO 32070 

32060 XXX=PEEK(XX)-128:G0SUB 32100:GOS 

UB 32110 

32070 NEXT XX:PRINT :GOSUB 32440 
32080 POSITION 5,22!? "PLEASE PRESS AN 
V KEY FOR SORT ":GET HI.XXX 
32090 ? CHR$(125):GOTO 32150 
32100 XX$(LEN(XX$)+1)=CHR$(XXX):RETURN 

32110 IF LEN (XX$)<10 THEN XX$(LEN(XX$) 
♦l)=".":GOTO 32110 

32120 XAR$(LEN(XAR$)«1)=XX$:XX$="":RET 

URN 

32125 REM > FIRST THREE CHARACTERS BEL 
OM ARE ESCAPE,CONTROL "2" 

32130 ? "a® TRY AGAIN PLEASE - TYPE 
'CONT* ":? " AND PRESS <E 

NTER>":STOP 
32140 GOTO 32010 

32150 ? CHR$(253):XX-10:FOR XZX1=1 TO 
LEN (XAR$)/XX:XX1=XZX1*XX:XROM=LEN <XAR$ 
)/XX 

32160 FOR XZX2=1 TO LEN(XAR$)/XX:XX2=X 
ZX2MXX 

32178 POSITION 2,10:? "1st. SORT ":XZX 
lj" ";XZX2;" " 

32180 IF XAR$CXX1-9,XX1J<XAR$CXX2-9.XX 

2) THEN XROM=XROM-l 

32190 NEXT XZX2 

32200 XROH(XZXl)=XROM 

32210 NEXT XZX1 

32220 FOR XZX1=1 TO LEN(XAR$)/XX:XX1=X 
ZX1MXX 

32238 FOR XZX2=1 TO LEN(XAR$)/XX:XX2=X 
ZX2*XX 

32248 POSITION 21,10:? "2nd. SORT ":XZ 
X1; M ":XZX2;" " 


32250 IF XZX1=XR0HCXZX2) THEN XAR1$(XX 
1-9.XXII=XAR$ CXX2-9.XX2I 
32260 NEXT XZX2 
32270 NEXT XZX1 

32288 XAR$="":XAR$=XAR1$:XAR1$="" 

32290 POSITION 13,12:? ,, OSORT COMPLETE 
D ":REM 1ST.CHARACTER ESCAPE. CONTROL" 
2", WORDS INVERSE 

32300 FOR XXX=1 TO 500:NEXT XXX:? CHR$ 
(1251:GOSUB 32440 

32320 POSITION 3,22:? "DO YOU HISH TO 
PRINT THE LIST Y/N ":GET Ml.XXX:IF XXX 
=78 OR XXX=110 THEN 32380:REH Y/N INV. 
32330 TRAP 0:TRAP 32340:LPRINT " ":GOT 
3 32350 

32340 POSITION 5,22:? "□ SWITCH ON T 
HE PRINTER PLEASE ":REM 1ST. CHARACTER 
ESCAPE.C0NTR0L"2" 

32345 GOTO 32330 

32350 LPRINT CHR$(15):CMR$<271:CHR$(48 
I 

32360 XX=10:FOR XZX1=1 TO LEN(XAR$)/XX 
:XX1=XZX1«XX:LPRINT XAR$(XX1-9.XXI):NE 
XT XZX1:LPRINT CHR$<27):"G" 

32370 REM > Y/N IN LINES 32390 AND 324 
38 ARE IN INVERSE VIDEO 
32380 POSITION 0.22:? " DO YOU WISH T 
0 RECORD ON DISC WUIU GET H1,D:IF 
0=78 OR D=110 THEN 32420 
32390 TRAP 32410:CLOSE M3:0PEN M3.8.0. 
"D:XXX.DAT" 

32400 PRINT M3:XAR$ 

32410 CLOSE M3 

32420 POSITION 0,22:? " DO YOU WISH TO 
CALL VARS0RT2 BDl'^GET M1.D:IF D=8 
9 OR D=121 THEN CLOSE M1:RUN "D:VARSOR 
T2.SAV" 

32430 CLOSE Ml:NEW 
32440 XX=10:XXXLIN=5:HZK1-0:XZX2=1 
32450 FOR XX2=1 TO LEN (XARS)/XX:XX1=XX 
2*XX:POSITION XZX1.XXXLIN:? XAR$(XX1~9 
.XXI):XXXLIN=XXXLIN+1 

32460 IF XXXLIN=19 AND XZX2=1 THEN XXX 
LIN=5:XZX1=14:XZX2=2:GOTO 32498 
32470 IF XXXLIN=19 AND XZX2=2 THEN XXX 
LIN=5:XZX1=28:XZX2=3:G0T0 32498 
32480 IF XXXLIN=19 AND XZX2=3 THEN XXX 
LIN=5:XZX1=0:XZX2=1:GOSUB 32588 
32490 NEXT XX2'.RETURN 

32508 POSITION 3.22:? "PLEASE PRESS AN 
Y KEY FOR NEXT PAGE":6ET Ml.XXX 
32518 FOR XXX=19 TO 5 STEP -1 '.POSITION 
0 .xxx:? " 

";:NEXT XXX:RETURN 











VARSORT continued from page 36 


Line 32180 compares the variable in the first loop 
(using' XX1' to split it from the long string) with the 
variables as they appear in the second When the 
first variable is less' (alphabetically speaking!) than 
that in the second loop then XROW (initially 
representing the total number of variables) is 
reduced by one. 

Line 32190 goes back for another pass through 
loop XZX2 until this is completed. 

Line 32200 comes into effect when loop XZX2' 
has completed its cycle, checking each of its items 
against the single item of loop'XZXIXROW now 
holds the actual position which the loop 'XZXV 
item will hold in the new string. This is now placed 
in the array XROW, the position within the array 
being determined by the pass through loop 

xzxv. 

Line 32210 now returns for the next pass through 
loop XZX1' (just one item before going through 
loop XZX2 again). XROW is automatically re¬ 
initialized to the total number of variables before the 
loop'XZX2' starts. This continues until the whole of 
loop XZXV has been compared with the items 
shown by loop XZX2 , and the 'XROW array 
contains the new positions. 

Line 32220 starts a loop'XZXI * running as before. 
XX V is set as before. 

Line 32230 starts loop XZX2 as before. XX2' is 
set as before. 

Line 32240 prints the state of the loops to screen 
(alongside the other). 

Line 32250 checks the first loop XZX1' and if the 
pass is equal to XROW array as defined by the 
pass through the loop XZX2' then the new string 
has the variable shown in that pass through XZX2' 
transferred to the new string in the position which 
XZXV and XROW (XZX1)' agree upon. Line 
32260 goes back for another loop through XZX2' 
and line 32270 through XZX1 
Line 32280 When all is finished and the new string 
XAR1 S' contains the sorted list then this line sets 
about restoring the original string. XAR$* is first 
emptied, then 'XARS' is made equal to XAR1 S', 
finally XAR1 S' is emptied. 

Line 32290 prints the fact that the sort has been 
completed and line 32300 pauses for a while, 
clears the screen and GOSUB's line 32440 for a 
print out 

PRINT IT? 

Line 32320 asks you if you wish to print the list - 
waits for an answer Y or N. An N' would send the 
program to line 32380. 

Line 32330 sets a TRAP in case the printer is not 


switched on: does an exploratory LPRINT, which if 
O.K. then passes on to line 32350. 

Line 32340 is the error routine which prints the 
message to switch the printer on. Line 32345 
sends you back to line 32330 so creating a loop, 
this will continue (ringing the bell in the process) 
until the printer is switched on. 

Line 32350 sets the printer to the Condensed Print 
and 8 lines to the inch mode. This should be 
changed to suit your own printer. 

Line 32360 sets XX' to equal 10: starts a loop 
XZX1 running from 1 to the number of variables 
as before: sets XXI' as before: prints to paper the 
variables out of XARS as defined by XX': goes back 
for another pass: clears the printer settings 
Line 32380 asks if you wish to record to Disc. An 
N would send you to line 32420. The variables 
would be filed under the name D: XXX DAT and can 
be used by the program VARS0RT2. 

Line 32390 sets a TRAP toclose the channel when 
finished: OPENs a channel to write data to the 
above file. 

Line 32400 prints the data to disc. 

Line 32410 closes the channel. 

Line 32420 asks you if you wish to call the program 
VARS0RT2. A V would cause VARS0RT2 to be 
run, so erasing both your own program and 
VARS0RT1 in the process The moral being SAVE 
171! 

Line 32430 An’ N would close the keyboard input 
channel and issue a NEW instruction, with the 
same effect as above with regard to your 
program. 

PUT IT ON SCREEN 

Line 32440 sets 'XX' to equal 10: 'XXXLIN' (line 
counter) to 5: XZX1' (screen print position) to 
zero. 

Line 32450 starts a loop XX2' as before: XXI' is 
set as before: at a position defined by XZX1' and 
XXXLIN' the variables are printed: 'XXXLIN' has 1 
added to it 

Line 32460 XXXLIN' is checked, if 19 and XZX2' 
equals 1 the XXXLIN' is reset to 5: XZX1' to 14: 
XZX2' to 2: the program then GOTO's line 
32490. 

Line 32470 checks XXXLIN', if 19 and and 
XZX2 equals 2 then XXXLIN' is reset to 5: 
XZXV to 28: XZX2' to 3: and goto's line 
32490. 

Line 32480 checks XXXLIN', if 19 and XZX2' 
equals 3 then XXXLIN' is reset to 5: ‘XZXV to 
zero: 'XZX2' to 1: and GOTO's line 32500. ». 
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LANDSCAPE continued from page 22 


1950 

DATA 

9,94,230.72.80.96.04,120 

1900 

DATA 

1,2,4,8,10.32,04,128 

1970 

0ATA 

144,122,55,18,10;0,2.1 

1980 

0ATA 

128,04,32,10,8,4.2,1 

1990 

DATA 

0,24.120.255.120.30.30,0 

2000 

DATA 

0,0,24.24.24,24,24,0 

2010 

DATA 

0,0,0,0,204,204,51.51 

2020 

DATA 

42,148,75,180.93,140,41,04 

2030 

DATA 

16.40.08,140,00,40,10,0 

2040 

a 

DATA 

8,130,140.170.214.170.140.13 

HP 

2050 

DATA 

10.40.40.04,04,170.84.0 

2000 

DATA 

255,255,129,00,30,24,92,231 


Line 32490 sends you back for another pass 
through the loop. When the loop is finished the 
program RETURNS to a position immediately after 
the original GOSUB. 

Line 32500 asks you to press a key for the next 
page and then waits for an input 
Line 32510 uses a loop XXX' to print a line of 
blanks from lines 1 9 to 5: returns to line 32490. 

Even if you do not type it in I hope that the line by 
line explanation will help you to understand the 
structure of the program and will help you to write 
your own utilities. VARS0RT2 will follow in the 
next issue. • 


FLAGS continued from page 30 


1)N POKE A,70:P0KE A+C3,C6:P0KE A*4,C 
6:POKE A+C5.C0 

1911 PtfE CR1,C12:P0KE CR2,118:P0KE CR 
3,SR:POKE CR5,24:G0SU8 SCAN:RETURN 
1921 GRAPHICS CIS 

19JR POSITION C2.C3:? BC6;"national fl 
ags" 

1940 POSITION Cl,7:? BCO;"AUTO-DISPLAY 
IS" 

1950 POSITION Cl,9:? BC6:"N8M OPERATIN 

G..." 

1910 FOR F=C1 TO 20 
1970 PONE CR1.118:F0R K=C1 TO C18:HEXT 
N 

1900 POKE CR1,C0:F0R K=C1 TO C10:IEXT 

a 

1990 RENT F:RE TURN 

2000 GRAPHICS C0:P0KE 02,C1:P0KE CR2.C 
0:P0KE CR3.C10 
2010 ? " 


NCTXCNAL F 


2020 ? " r— 

I 

f 

T“ 

T 1 

1—▼ 







2021 ? " 1 

1 

1 

1 

1 1 

1 1 

1" 






2022 ? " h— 

■< 

1 

1 

1 1 

1 1 

1" 






2023 ? " I 

1 

1 

1 

1 1 

1 t 







2024 ? " \— 

—H 

1 

1 

I 1 

1 1 

1" 






2025 ? " 1 

1 

1 

1 

1 1 

1 1 

1" 






2020 ? " *- 

■ 

i- 


» ■ 

1_l 


nal Flags consi 


2100 ? "Verv nany Nat: 
st of a pattern of just three colours 
in one" 

2110 ? "of the above designs, with or 
without":? "the addition of an enfeleN. 
This" 

2120 ? "progran vas devised to aid in 
their identification." 

21J0 ? :? "Scandinavian Cross flags ar 
e included, together with a feu others 
to add sow varietu.":? 

2140 ? "You will have the option of a 
Quiz or a continuous display." 

2150 ? :? 


2100 Z=PEEK(INK):IF Z=C255 THEN 2100 
2170 POKE INK.C255:RETURN 





















Hardware 


THE HARD(WARE) FACTS 

EVERYTHING YOU WANTED TO KNOW ABOUT YOUR ATARI 
BUT WERE AFRAID TO ASK (PART 3) 

HEADPHONES SERIAL I/O PORT 


Ever thought about monitoring the sound pro¬ 
duced by your computer on headphones? This is 
okay if you have a TV with a headphone socket but 
it is not really hi-fi because it is usually wired by the 
manufacturers into the speaker circuit and any 
hiss or hum present is more noticeable. So what 
can you do to improve quality or if you do not have 
a TV with a headphone socket? Firstly you can 
forget any ideas you might have of adding a socket 
to a TV which was not designed to have one. 
Definitely not on. You have a choice of simply con¬ 
necting a small amplifier to the audio output of the 
computer externally and letting this drive your 
headphones as shown in Figure 4 or fit a small 
special purpose amplifier inside the computer 
with a socket for headphones fitted in a con¬ 
venient position. The latter is of course the neatest 
solution but requires mom work and involves drill¬ 
ing holes and soldering. The choice is yours. 

To prevent any problems with possible leaky bat¬ 
teries it is suggested that batteries are not put 
inside the computer. Possibly a plug and socket 
arrangement at the rear or a seperate low voltage 
power supply unit driven from the mains. Such a 
project is for experienced constructors only 
though. 


One of the lesser known parts of the Atari is the 
peripheral connector at the side into which your 
410 or other peripherals plug. It is a 1 3 pin Molex 
plug, part number MX 7514-4.13 - a non¬ 
standard plug if ever I saw one! A pity Atari did not 
put on a nice standard D-type connector. 

Figure 1. r\ \ 6 8 io iT"\ 

/ 1 3 5 7 9 11 13 \ 

1. CLOCK IP 5. DATA OP 9 PROCEED 

2. CLOCK OP 6 GROUND 10. ♦SV READY 

3 DATA IP 7. COMMAND 11. AUDIO IP 

4 GROUND 8 MOTOR CTL 12. *12V 

13 INTERRUPT 

Not only is the number of pins non-standard, the 
diameter and spacing is also different so any ideas 
you may have about cutting down a 1 5-way D- 
type socket simply will not work, I have tried it. If 
you want to plug anything in to this socket, you 
have a problem. I have not yet been able to find a 
supplier in the U. K. for the socket to fit the 1 3-way 
I/O plugs but you can buy these sockets with any 
length of shielded (screened) cable attached from 
Elite Digital, P.O. Box 1414, Melville. New York 
1 1747. For those of you who are interested in try¬ 
ing expansions through the I/O port details of the 
connections are given in Figure 1. 


5 pm DIN socket 
(monitor |ack) 


Composite 
video output 


Audio output 

Figure 4 



The MFC4000P l/C chip used for the amplifier 
gives 250mvw( , ,4 wan) with 9 vottjma* | supply. 
More than enough to drive headphones. It is very 
small - 7mm x 4mm. 

2_3 

INPUT- I -+ 

I MFC 4000P 

GROUND- | __OUTPUT 

1 4 

Unfortunately you need almost a dozen extra parts 
to make it work, but then that applies to most 
chips. The complete circuit diagram is shown in 
Figure 5. 











A ROM EXPANSION BOX 


The advantage of games cartridges is that they 
instant load, however you still have to open the lid 
to change cartridges. With tape or disk it is poss¬ 
ible to load a particular game by typing in its name 
and the computer will search the tape or disk for 
the program required. It would be nice to select 
cartridges in this way but of course you can only 
have one cartridge inserted at a time. Even on the 
800 the second slot is of no use in this 
connection. 

The solution is. I think, to have a seperate box 
containing its own low voltage power unit and say 
10 sockets wired in parallel, except for the CS pins 
which are individually wired. A multiway ribbon 
cable is then fitted with a suitable connector and 
plugs into the left hand ROM socket of the com¬ 


puter. It should be possible for someone to write a 
short program and with the aid of an EPROM bur¬ 
ner put it on ROM which would be put in slot 1 of 
the expansion box. This ROM would contain a 
menu. The BASIC cartridge would be put into slot 
2 with various other games or languages taking 
up the remaining slots. The Menu program would 
ask which of the available cartridges you wished 
to load and exiting a program by using SYSTEM 
RESET would bring you back to the Menu for a 
new selection. I thought of this idea about six 
months ago and keep meaning to try it out but 
available time does not permit On this occasion 
perhaps I can pass the idea over to PAGE 6 readers 
and maybe one of you could come up with a 
finished product or prototype. Figures 2 and 3 
give a little more information to get you started. 
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TYPO TABLES 


C0L0URFL0H 

Variable checks m = 164718 


Line m* range 

Code 

Length 

1008 

- 1110 

IY 

332 

1121 

- 1238 

KB 

44? 

1248 

- 1338 

AO 

299 

LANDSCAPE 



Variable checks** » 

981791 


Line nt* range 

Code 

Length 

0 

- 100 

DT 

517 

110 

- 198 

TA 

531 

200 

- 290 

JO 

587 

380 

- 410 

MS 

392 

428 

- 580 

LG 

58? 

510 

- 580 

UJ 

547 

598 

- 700 

GM 

472 

710 

- 798 

NA 

558 

798 

- 980 

EH 

510 

910 

- 1028 

GO 

412 

1038 

- 1108 

JF 

592 

1110 

- 1170 

JS 

534 

1180 

- 1298 

SI 

470 

1388 

- 1410 

HJ 

438 

1428 

- 1488 

IK 

587 

1490 

- 1588 

VY 

527 

1598 

- 1478 

X 

422 

1488 

- 1798 

cu 

414 

I860 

- 1928 

JX 

477 

1938 

- 2048 

6N 

355 

2858 

- 2848 

JL 

42 


FULL DETAILS 
OF TYPO 
APPEAR IN 
ISSUE 5 

GRID 


Variable checks** = 98886? 


Line 

n*« ranoe 

Code 

Length 

18 

- 140 

M6 

41? 

158 

- 248 

0T 

429 

278 

- 370 

to 

542 

388 

- 480 

CV 

538 

498 

- 588 

HU 

526 

598 

- 780 

HA 

583 

710 

- 810 

DO 

583 

828 

- 910 

TE 

554 

928 

- 988 

RD 

525 

998 

- 1098 

X 

555 

1188 

- 1218 

RS 

444 

1228 

- 1380 

HZ 

582 

1310 

- 1428 

MG 

424 

1438 

- 1528 

IF 

535 

1538 

- 1400 

ZL 

583 

1410 

- 1710 

YO 

557 

1728 

- 1838 

CC 

498 

1848 

- 1958 

GN 

438 

1948 

- 2878 

ZC 

388 

2888 

- 2178 

CJ 

579 

2188 

- 2298 

SI 

397 

2388 

- 2410 

IK 

337 

2428 

- 2538 

YR 

411 

2540 

- 2458 

JT 

310 

2448 

- 2778 

TK 

193 

2788 

- 2898 

a 

255 

2980 

- 3810 

CO 

274 

3828 

- 3138 

m 

514 

3148 

- 3158 

VT 

123 


FLAGS 

Variable checks** = 3538515 


Line 

n*a range 

Code 

Length 

0 

- 35 

C6 

432 

34 

- 125 

XE 

444 

138 

- 310 

IK 

354 

310 

- 481 

CG 

358 

482 

- 413 

RK 

458 

414 

- 425 

HE 

444 

426 

- 437 

OH 

449 

438 

- 858 

SE 

425 

848 

- 940 

PJ 

440 

958 

- 1048 

CU 

385 

1078 

- 1188 

MS 

188 

1198 

- 1380 

OJ 

271 

1318 

- 1428 

OP 

294 

1430 

- 1548 

DA 

299 

1558 

- 1448 

K 

338 

1670 

- 1780 

SS 

245 

1798 

- I960 

* 

472 

1910 

- 2828 

VJ 

342 

2121 

- 2138 

FP 

599 

2140 

- 2178 

KB 

154 


TURTLE 



Variable checks** = 

564954 


Line n** range 

Code 

Length 

1 - 100 

TU 

520 

101 - 1058 

RD 

579 

1048 - 1138 

GH 

554 

1140 - 2888 

GH 

618 

2838 - 2878 

MC 

340 


GRID continued from page 12 


27M DATA 8,8,8,8,0 
2711 DATA M,M,I 
2728 MIA M,M,I 
2718 DATA 8,8.1,8,• 

2741 DATA 6,0,0,0,0 
2758 NTA 8,8,8,8,8 
2718 OATA 8,1,8,8,184 
2778 DATA 182,5,188,98,159 
2788 DATA 7,12,92,228,95 
2798 DATA 171,25,5,288,5 
2888 DATA 12,187,5,12,184 
2818 DATA 6,75,98,228,159 
2828 DATA 3,111,281,166,281 
2838 DATA 189,8,6,113,285 
2848 DATA 188,8,6,157,8 
2858 DATA 6,189,75,6,111 
2(58 DATA 284,118,18,178,189 
2878 DATA 16,6,111,285,189 
2888 DATA 17,6,133,287,189 


2898 DATA 27,6,131,288,189 
2988 DATA 28,6,133,259,166 
2918 DATA 284,169,8,145,256 
2928 DATA 136,192,255,248,1 
2918 DATA 282,16,246,164,284 
2948 DATA 177,288,164,285,145 
2958 DATA 286,116,112,285,192 
2968 DATA 255,248,4,198,284 
2978 DATA 16,217,198,283,16 
2988 DATA 178,96,162,3,171 
2998 DATA 24,6,111,286,171 
3888 DATA 25,6,111,287,188 
3818 NTA 12,6,189,211,6 
1828 NTA 49.286,145,286,188 
1818 DATA 4,6,189,227,6 
3848 DATA 17,286,145,286,152 
1858 NTA 157,12,6,282,16 
3868 NTA 229,96,2,12,12 
3878 NTA 192,252,242,287,47 


xITIt. 


1888 MN 

3898 I=PEER(106)-0:PORE 54279,1:PARE 5 


1277,3 :PMNSE=1*256 

3188 IQ5SlLE=PMA5E+364: J=1IT (MISSILE/ 

256) :P8KE 1568, UQS5HE"J*256) :P8RE 15 


61,3 

1118 PIAYE10=PMNSE*512: J-IRT (PLATEN/ 
256) :P6tE 1552, (PtAYEN _ 3*256) :P08E 15 


53,3 

3128 PIAYEI1=PIBASEH40: J=IRT (PLAYER!/ 
256):P6RE 1554,CPLAYER1-3*256):P8RE 15 


55,3 

3118 PlAYEI2-PfBASE*760:J-IRTCPLAYER2/ 
256):P8RE 1556,CPLAYEt2-3*256):PARE 15 


57.3 

3148 P1AYEI3=P«A5E«896:3=1ITCPLAYER1/ 
256):P8RE 1558,CPtAYERl-3»256):PORE 15 

59.3 

3158 F8R J=PMMSE T8 PMM5E«1824:P8RE 
3,8:KIT 3:8=158(1615):tETHM . 












DUST COVERS 



BACK ISSUES 


Don't risk a breakdown of your precious equip¬ 
ment through dust and dirt! Protect all of your 
equipment when notin use with a custom made 
dust cover. Natural PVC with a brown trim - 
easily folded away when your equipment is not 
in use. Easily fitted with all peripherals, joys¬ 
ticks etc. in place. 


Issue 3 


Calendar 
Cricket Maths 
Arcade Action 
Character Redefinition 
Character Generation Utility 
Keyboard Techniques 
Character Designer 
Software Reviews 
Master Directory 


400/800/600Xiy800XL 
410 Old Style cassette* 
410 New Style cassette 
1010 cassette 
810/1050 diskdrive 
1020/1027 printers 


Issue 4 


Lunar V 
Arcade Action 
Merlin s Magic Square 
Memory Mapped Screens 
Basic Timing 
Grab an Apple 
Software Reviews 
Disk Sort 
First Steps 


•old style does not have a pause button. 

Also for all popular printers (normally £3.95) 


Issue 5 


Target 

Memory Mapped Screens 
Squares 

Arcade Action - Miner 2049er 

Vertical P/M Movement 

Software Reviews 

First Steps 

Colour Selector 

Line Lister 


DISK/CASSETTE CARDS 


Keep track of your pro¬ 
grams easily and 
tidily. 


Issue 6 


Disk insert cards. Pack 
of 25 


Memories 
Telecommunicate 
Scramble 
Time for Music 
Dodger 
Book Reviews 
Hypnosis 
Automatic Drive 
First Stepft 


Cassette inlay cards. 
Pack of 25. 

£1.00 each pack inc. 


postage. 


Issue 7 


Slots 

Seasons Greetings 
Grubs 

Going for a Drive 
Bugs 

Atari Basic Sourcebook 
Your Own Bulletin Board 
First Steps 
Largeprint 


THE PAGE 6 LIBRARY 

Available to subscribers only, the PAGE 6 
LIBRARY is a fine collection of Public Domain 
programs from around the world. Hundreds of 
user-written programs (including machine- 
code) at very little cost. Send a stamped 
addressed envelope if you have not had 
current details. 


Wildwest 
Demo 21 
Sonar Search 
Player Missile Graphics 
Graphics 8 Text 
Using XIO FILL 
The Hardware Facts 
Return Key Mode 
Make Your 410 Work! 


ORDER ALL ITEMS ON THIS PAGE FROM 
PAGE 6 MAGAZINE 
P.O.BOX 54, 

STAFFORD 
ST16 1 DR 


Hungry Horris 

Another Brick from the Wall 

Fine Scrolling 

Understanding Strings 

Player Missile Graphics 2 

Text Draw 

MiniDos 

Adventure 

...and lots more! 


Please make cheques 
payable to PAGE 6. 


ISSUE 10 

ADVENTURE SPECIAL 
ALSO AVAILABLE 

Issues 1 & 2 SOLD OUT 

Issue 3 70p inc. postage 

Issue 4 onwards £1.00 each inc.postage 
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Beginners 


FIRST STEPS 

Mark Hutchinson 


Have you ever written a program in Graphics 1 
with a text window and wished that you could have 
the space of Graphics 0 but still use the window? 
Well, you can. Normally changing the screen 
means altering the display list but as the window 
itself is in Graphics 0 I would consider this an 
impossibility. You may be able to use the vertical 
blank interrupt but you would need to know 
machine language. The answer is really very 
simple. When you call a Graphics mode the 
machine must store either 24 lines of Graphics 0.4 
lines for the window of another mode or 0 lines for a 
Graphics mode+16 (i.e. no text window). Location 
703 is used for this purpose. All you need to do is 
call GR.0 and POKE 703,4. When the display 
hand lei reads 703 it is forced to open device #6 as 
with any other mode with a window. This means 
you PRINT #6; tothetop20 linesand PRINT to the 
bottom 4 lines. Didn't I say it was simple? 

If you have little memory to spare and want to try 
out Player Missile Graphics in single-line resolution 
do you realise that you can only use five players 
(four plus the combined missiles) maximum which 
means 5x256 bytes? As you need to start on a 2 K 
boundary, you may think that there are 3 x 256 
bytes wasted. Not at all. You can still store other bits 
of data here if you wish but be warned, BASIC A4- 
uses this technique so be careful if you use this 
language. 

Have you ever wished to add a utility to your 
program but cannot as both the utility and the 
program use the page 6 storage area? The answer 
is simple Set one or both routines up as a string. For 
example 

10 FOR 1=0 TO 30: READ DATA: POKE 
15364-1,DATA: NEXT I 
20 X=USR(1 536) 

uses page 6. Try the following 

10 DIM A$(31): READ DATA: A$(I.I)=CHR$- 
(DATA): NEXT I 
20 X=USR(ADR(A$)) 

Although you have used extra memory through 
the DIM statement the routine itself has now 
become relocatable, i.e. the computer protects the 
string itself and will move it around in memory to do 


so. Alternatively you could use 

10 DIM A$(31): FOR 1=0 TO 30: READ DATA: 
POKE ADR(A$)4-I,DATA: NEXT I 

The FOR/NEXT - READ statements will take up a 
lot of space, so I suggest that once you have the 
string defined, delete the above lines and use the 
following after having RUN line 10 only. 

PRINT A$ (in direct mode) 

Use the editing features to make 19 spaces before 
the printed string and add 
10 DIM A$(31): A$" 

After the printed A$ add - ”:X=USR(ADR(A$)) 

You can now delete all the DATA and save yourself 
some memory. 

By taking this one stage further you could use 
X=USR(ADR( assembly codes ")) and save eight 
bytes by not using a string. By coincidence you can 
also save eight bytes each time you use POKE 
instead of SETCOLOR and. finally, using cursor 
control characters takes one byte each instead of 
the massive 1 5 for a POSITION statement 

I am now finding this column hard to compile. Not 
because I have nothing to write about but mainly 
because I am limited to one page and the articles I 
would like to include would take more room. What I 
need now is readers suggestions, either to me or 
the Editor, for page size articles. With your help I 
can explore the areas YOU wish to read about 

You will be reading this in September and, hope¬ 
fully, I should be in sunny Florida in October. If you 
want any questions answered directly please write 
as soon as possible, otherwise you may have to wait 
many weeks for a reply. 

Finally, I hope that by the time you read this I will 
have my last(?) FI RST STEPS TUTORIAL tape out 
I hope that they have been of some benefit and, 
although they were designed for the beginner, I 
hope that the tapes included something for the 
more advanced. 

Write to Mark at BAUG SOFTWARE. P.O.BOX 
10, BELFAST. BT10 0DB 













GOTO DIRECTORY 


The GOTO DIRECTORY is a guide to retailers who 
provide product support for Atari Many of these 
retailers will supply Mail Order so if you have trouble 
finding a supplier, turn to the GOTO DIRECTORY. 

Retailers who are interested in an entry in this feature 
are invited to contact the Editor on 0785 41153. 


AS.Wootton & Sons. 

116. Edleston Road, 
Crewe, 

CW2 7HD 

Tel: 0270 214118 

Nothing but Atari. 
Authorised Sen/ice Cen¬ 
tre with fast turnaround 
of all repairs. The usual 
range plus printers, joys¬ 
tick inserts, extension 
leads at very good prices. 
Try us for repairs or 
purchases. 

Channel One Computer 
Systems Ltd. 

1 74, High Street. 
Hornchurch. 

Essex 

Tel:Hornchurch (04024) 
75613 

We have a large range of 
software plus hardware, 
printers etc. A good 
selection of American 
software including the 
more unusual such as 
Compilers. Editors. 
Assemblers etc. AH for 
Atari. 

Home Entertainment 
Atari Center. 

212-213 Broad Street. 
Birmingham. 

B1 5 1 AY 

Tel:021 643 9100 

Your dedicated Atari 
retailer for the best in the 
wonderful world of Atari. 
Mail Order Software 
Courier service - phone 
021 643 9100 or write 
FREEPOST. Atari 

authorised Independent 
Service Centre. 

Home Entertainment 
Atari Center, 

In-Store Shop. 

Lower Ground Floor. 
Owen Owen Store. 
Mander Centre. 
Wolverhampton 
Tel: Wolverhampton 

(0902) 711650 

Your in-store Atari Center 
specialising in Atari 
related products and 
including an Atari Service 
pick up point. 


Jennings Stores. 

248. Hertford Road. 

(Nr. Green Street). 

Enfield, 

Middx. 

Tel. 01 804 1767 

Very large range of 
English and American 
software available as well 
as the very latest in hard¬ 
ware. 


Microbyte, 

71. Seaview Road. 
Liscard. 

Wallasey. 

Merseyside. L45 4QW 
Tel. 051 630 6933 

Tired of high prices, poor 
service and hidden 
charges from other Mail 
Order retailers? Try us for 
the latest titles and U.S 
mags. Visitor call anytime 
up to 7pm 


Norman Audio Ltd. 

51, Fishergate, 

Preston, 

Lancs 

TeL 0772 53057 

Authorised Atari Service 
Centre. Dealers in Atari 
products since 1978. 
Competitive prices and 
full after-sales back up. 
Personal service or Mail 
Order. 

Radford Hi-Fi Ltd. 

52, Gloucester Road. 
Bristol. 

Avon 

Tel:0272 428247 

We stock and suport a 
comprehensive range of 
products for Atari. Huge 
range of software from 
educational to small 
business (plus games of 
course). Word process¬ 
ing packages. Printers. 
All for the best 
computer! 


Trionic, 

144. Station Road. 
Harrow. 

Middx HA1 2RH 
Tel:01 861 0036 

Software. peripherals, 
books and magazines. A 
comprehensive range for 
Atari. Try our late night 
shopping. Open 10 a m to 
8 p.m. Monday to Satur¬ 
day. Give us a call or pay 
us a visit 


York Computer Centre 
7. Stonegate Arcade. 
York 

Tel: 0904 641862 

Top American and 
English software - over 
1000 titles! Hardware, 
books. magazines, 
accessories. If you need 
anything for your Atari, 
try Yorkshire's widest 
and most comprehensive 
range of products for your 
machine. 


★ COMPUTE-A-WIN ★ 

USE YOUR ATARI 16K. 48 K TO SELECT WINNERS 
ALL YEAR ROUND 

2 COMPLETE PROGRAMS FOR THE PRICE OF I 

Side A - FLAT RACING 
SIDE B - N/HUNT RACING 

Eack program covers all tracks In England ft Scotland 
Each a*If contained program allow* choke of 

1. QUICK selection - usln t any dally newspaper 

(no racing knowledge required) 

2. SPECIALIST selection • using Information given In a pop¬ 
ular 'Racing' paper e.g. pant form, weight carried, draw advan 
tape, trainer/jockey ratings, speed ratings etc., etc. 

CASSFTTF ONI Y hom LOWMAC SOFTWARE 
L^bbfcTTt ONLY « CROWL£Y GARDENS 

£6.95 BLAYDON-ON-TYNE NE21 5EJ 


LIVERPOOL 

THE FOOTBALL MANAGER GAME FOR THE 
48K ATARI (Inc. XL) FEATURING 

The full first division programme, together 
with all F.A.Cup, Milk Cup, and European Cup 

games 

Varying skill and stamina levels, scouts reports, 
injuries, team and tactics selection, full league 
table, managerial rating and save game facility. 

Available on CASSETTE ONLY at £9.45 from 

D.Corbtshley. 212, Walmersley Old Road. 
Bury. BL9 6SA 











Programming 


RESET ROUTINES 


One of the program routines which caused most 
interest appeared in Issue 6 in the game Scramble. 
It was a simple means of re-running a program on 
SYSTEM RESET. The routine shown would not 
work on the XL models but the following routine 
will. 

10 POKE 2*52:POKE 3.18S:P0KE 9,2:TRAP 

1100 

20 GRAPHICS 18:P0SITI0N 1.5:? tt6; M pres 

s system reset*' 

30 GOTO 30 

1000 RUN 


A more sophisticated SYSTEM RESET routine is 
given here. Unfortunately this will not work on the 
XL models. If anyone can come up with a fix. please 
let us know. 


Cassette users should change lines 30 and 300 
as follows. 


30 I=ADR(R$):H=INT (1/256): L = I-H*256:PO 
KE 9.2!POKE 2 , L : POKE 3.H:P0KE 842.12:G 
RAPHICS 0 

300 POKE 9.0:P0KE 2.0SP0KE 3.0:? "NOW 
PRESS THE SYSTEM RESET BUTTON":END 

Keep those prying eyes out of your programs! 


1 REM ***** SYSTEM RESET ROUTINE ***** 
5 REM ** USE ESCAPE KEY TO EXIT ** 
10 DIM R$(49) 

20 RS=" FTW H* a*H ClTEMlR aSlu EfflN MP3 
Fit amt H5r"BJ j Lef" 

30 I=ADR(R$):H=INT(1/256):L=I-H*256:PO 
KE 12.L:P0KE 13, H:POKE 842.12:GRAPHICS 

0 

35 REM MMMMMMMM M MMNM** * *MMMMM M MMMMMM«M 
100 REM ****** DEMONSTRATION 
105 GRAPHICS 18 

110 POKE 16,64:POKE 53774.64:REM DISAB 
LE BREAK KEY 

115 POSITION 6,4:? H6 :"IJ4'1IT4IT-J" 

120 POSITION 6.6:? tt6:" proqra*" 

130 POSITION 1,8:? U6;'*[]inSaaM113iiP 

HU" 

140 POKE 710,RND(0)*200 

145 IF PEEK (764)=28 THEN GOTO 300:REM 

ALLOW ESCAPE THROUGH ESC KEY 

150 GOTO 140 

299 REM RESET POINTERS TO NORMAL 

300 POKE 12.64:POKE 13.21:? "NOW PRESS 
THE SYSTEM RESET BUTTON":END 

399 REM 

400 REM MMMMM « * ** MM * M ****« HMMMMMMMM »*» 
500 REM ROUTINE IN DECIMAL FORM FOR 

INFORMATION 

600 DATA 169.148.141.197,2,169,125,32, 
164.246.169.2.133.84.169.0.169,82.32.1 
64.246.169.85.32.164,246,169,78.32.164 
700 DATA 246.169,28,32,164,246.169.28. 
32,164,246,169,13,141,74,3,76,0,160 


More SCREENDUMPS from a picture disk in the MACE library. Authors unknown. 
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IMIS WAY-Just pop into your local computer store-and there, (if you can spot it behind the 
washing machines and hi-fi’s next to the paperbacks or even by the toiletries), is just what you're 
looking for: providing you want this week’s top ten games for the Spectrum, or Simons Basic or even 
a few top titles for Atari. 

There's a sales assistant who might pay you some attention and, depending on their preference; 
will advise you on the superb graphics of the Spectrum, the Beeb's massive memory capabilities, the 
ease of programming a Commodore or how well the One will match your decor ‘And there's £10 off 
this box over here!' 

You do need to be an enthusiast to put up with it! 

Horned ata n i 2122a 

Entertainment AI f\I \ I Center Broad street 



OR, THIS WAY 

Certainly in the West Midlands, there’s another way Your Home Entertainment 
Atari Center in Broad Street, Birmingham. You'll be well-served by knowledgeable Atari 
enthusiasts, backed by the widest range of Atari associated products that only a 
solus-retailer can supply. Hardware, peripherals, software, books and magazines- 
special imports—all for Atari—and we're an Atari authorised independent Service 
Centre too. 

In the North-West, there's an Atari Center in Miller Arcade, Preston. And now in 
Wolverhampton, an “in-store" Atari Center at the Owen Owen store (lower ground floor) 
in the Mander Centre. 

If you're not in these areas, we can offer you an efficient Mail Order service that's only 
a phone call away. Backed with the same expertise, the same dedication to Atari-the 
same wish to sen/e you. __ 

We can’t sell you a washing machine, but I NO w open in Wolverhampton 
then no-one can do everything well. That's why I atari center at Owen owManiercen re. 

we specialise. I Wolverhampton. (0902) 711650 


Home i 
Entertainment 


ATARI CENTERS 


AAKHJINDS 212-213, Broad Street, Birmingham. B15 1AY. 
TELEPHONE: 021-643-9100 

MAIL ORDER: Tel 021-643 9100 or 
FREEPOST to the Birmingham Center 


NORTHWEST 

13, Miller Arcade, Preston, Lancs. PR1 2QA. 
TELEPHONE: Preston 562707 


Home Entertainment Ltd , is an independent dealer In Atari and 
associated products ATARI - is a registered trade mark of ATARI INC. 






COMPATIBLE 

For Atari owners, English 
Software programs are the finest. 

Our large and unique range of 
titles will stretch your imagination to 
the limit and beyond. 

The needle-sharp graphics, 
vibrant colours and super-smooth 
action will really test your skills. 

English Software is the leading 
independent for Atari-nobody does it 
better. 

And we re fast making our pro¬ 
grams compatible for Commodore 64. 

Order direct by using the coupon 
(or telephone the Sales Hot Line on 
061-835 1356 , quoting your Access or 
Visa n umb er). 

Find us at Boots. 

Laskys, Greens 

software dealers. 


JET BOOT JACK J2K Casselte/Disk by Jon Williams 
JET BOOT JACK, spacr-age logger. lakes you on a 
chase through the vinyl vaults of the PRESSING 


DIAMONDS I6K Cassette Disk by Simon Hunt 
Chase the Great White Diamond in ENGLISH 
SOFTWARE'S best selling mining game' >6 less 
plav make life very difficult indeed* 


PLANT' 


BATTY BUILDERS I6K tasselle’Disk bv Manuel 
Caballero Play BATTY BUILDERS and indulge 
younelf in one of the best non violent constructive 
computer game programs ever written. 


Hunt In the first sequel to the top-selling 
DIAMONDS. Brian the Blob has stolen the GREAT 
DIAMOND and hidden it in the deepest vault. 


(All I n|licl 
IfiHMul rtaiin« 


NEPTUNE’S DAUGHTERS I6K Cassette/Disk by 
Mark J Tavlor and Michael Hedlev Designed by Ralph 
Fromm. Our 1st multi-screen arcade adventure takes 
you beneath the ocean's waves in searc h id 
NEPTUNE S DAUGHTERS, held captive by the evil 


CITADEL WARRIOR J2K Cassrtlerthsk by Jon 
Mayers and Ken Famen The nations of the ssorld are 
at the mercy of D-E-A-T-H (Dastardly Farthvsidt 
A archists and Terrorists against Happiness ) They ar 
out to destroy the security CITADELS with their 
CYCLOTRON BOMBS 


THE ADVENTURES OF ROBIN HOOD I6K 
C assette/Disk by Tim Huntington Join ROBIN HOOD 
In his efforts to thwart the SHERIFF'S MEN. rescue 
the bass of silver and plant kisses on the lips of the 
hcautihil MAID MARIAN! 


THE ATARI GRAPHICS WIZARD! I6K Cassette/32 K 
Disk bv Steven A Riding THE ATARI GRAPHICS 
WIZARD introduces vou to the wonderful world of 
ATARI PIAYER (SPRITE) and CHARACTER 
GRAPHICS! Written totally in Machine Code, it 
contains PLAYER EDITOR (SPRITEMAKER); 
CHARACTER EDITOR MULTICOLOUR 
CHARACTER EDITOR 


CRlNEBERG LINKWORD LANGUAGE SYSTEM 
GERMAN >2KCassette Disk Deigned hx Dr Michael 
M Grunebcrg Program bv Stcscn A Riding With the 
use <d a unique blend «d visual imagers and pssvholo* 
it will teach vou the haste grammar and more than J> 
German words in onlv 10 hours' Supplied complete 
with separate audio pronunciation tape £1295 


To English Software Companv B<>\ 43. Manchester M60 3AI> 1 


he lollou 


Dan Stnkes Bu*k 
Citadel Warrior 
Grunebcrg German 
Jet Boot Jack 
Balt' Builders 


THE POWER OF EXCITEMENT 

The English Software Company, Bos 4 


Aijr A.C.E. THE ATARI CASSETTE 
ENHANCER bv Jon Williams 
Jr Cassette features include NariK-s 
cassette-saved programs. Searches and 
loads named program. Displays contents of 
cassette on screen Verify facility. Lists 
variables. Automatic line numbering 
Renumbers any basic program quickly. 
Creates binary files on tape Plus many, 
many more features Uses only 4K of 
memory maximum! £7.95 


PROGRAMMERS WANTED 

We’re always on the lookout for new 
programmers. If you can work to the 
English Software standard of quality, we ll 
reward you by marketing your programs 
across Europe and USA! Contact us today. 


From English Software. 
The supreme Atari challenge 

Only £9.95 






































